diff options
author | Andrey Ponomarenko <andrewponomarenko@yandex.ru> | 2016-08-15 19:34:14 +0300 |
---|---|---|
committer | Andrey Ponomarenko <andrewponomarenko@yandex.ru> | 2016-08-15 19:34:14 +0300 |
commit | 55e3a1847b2440d6f3966cff6d744ff3844e5114 (patch) | |
tree | 90739adce1f397135ac0e4967511fed60522b3a8 | |
parent | 0f715a644ce0651ad507936d43f9a8f4165fde16 (diff) | |
download | abi-dumper-55e3a1847b2440d6f3966cff6d744ff3844e5114.tar.gz |
Released 0.99.17
-rw-r--r-- | INSTALL | 4 | ||||
-rw-r--r-- | abi-dumper.pl | 20 |
2 files changed, 14 insertions, 10 deletions
@@ -6,8 +6,8 @@ All rights reserved. RELEASE INFORMATION Project: ABI Dumper -Version: 0.99.16 -Date: 2016-07-04 +Version: 0.99.17 +Date: 2016-08-15 This file explains how to install and setup environment diff --git a/abi-dumper.pl b/abi-dumper.pl index 5201b90..b129664 100644 --- a/abi-dumper.pl +++ b/abi-dumper.pl @@ -63,7 +63,7 @@ my $GPP = "g++"; my ($Help, $ShowVersion, $DumpVersion, $OutputDump, $SortDump, $StdOut, $TargetVersion, $ExtraInfo, $FullDump, $AllTypes, $AllSymbols, $BinOnly, -$SkipCxx, $Loud, $AddrToName, $DumpStatic, $Compare, $AltDebugInfo, +$SkipCxx, $Loud, $AddrToName, $DumpStatic, $Compare, $AltDebugInfoOpt, $AddDirs, $VTDumperPath, $SymbolsListPath, $PublicHeadersPath, $IgnoreTagsPath, $KernelExport, $UseTU, $ReimplementStd, $IncludePreamble, $IncludePaths, $CacheHeaders, $MixedHeaders, $Debug, @@ -122,7 +122,7 @@ GetOptions("h|help!" => \$Help, "all!" => \$FullDump, "dump-static!" => \$DumpStatic, "compare!" => \$Compare, - "alt=s" => \$AltDebugInfo, + "alt=s" => \$AltDebugInfoOpt, "dir!" => \$AddDirs, "vt-dumper=s" => \$VTDumperPath, "public-headers=s" => \$PublicHeadersPath, @@ -1003,7 +1003,7 @@ sub read_DWARF_Info($) return read_DWARF_Info($DPath); } else { - printMsg("WARNING", "Missed debuginfo $DName (gnu_debuglink)"); + printMsg("WARNING", "missed debuginfo $DName (gnu_debuglink)"); } } else { @@ -1012,7 +1012,7 @@ sub read_DWARF_Info($) } return 0; } - else + elsif(not defined $AltDebugInfoOpt) { if($Sect=~/\.gnu_debugaltlink/) { @@ -1021,6 +1021,9 @@ sub read_DWARF_Info($) $AltDebugInfo = $AltObj; read_Alt_Info($AltObj); } + else { + exitStatus("Error", "can't read gnu_debugaltlink"); + } } } @@ -5617,12 +5620,13 @@ sub scenario() } } - if($AltDebugInfo) + if($AltDebugInfoOpt) { - if(not -e $AltDebugInfo) { - exitStatus("Access_Error", "can't access \'$AltDebugInfo\'"); + if(not -e $AltDebugInfoOpt) { + exitStatus("Access_Error", "can't access \'$AltDebugInfoOpt\'"); } - read_Alt_Info($AltDebugInfo); + $AltDebugInfo = $AltDebugInfoOpt; + read_Alt_Info($AltDebugInfoOpt); } if($ExtraInfo) |