aboutsummaryrefslogtreecommitdiff
path: root/abi-dumper.pl
diff options
context:
space:
mode:
authorAndrey Ponomarenko <aponomarenko@rosalab.ru>2013-07-03 12:00:26 +0400
committerAndrey Ponomarenko <aponomarenko@rosalab.ru>2013-07-03 12:00:26 +0400
commit78b7f9923f0b38c98ce6d37bc0542764692afa6f (patch)
tree13f193f7ea2c24ca48a34805b16d46584d753d5f /abi-dumper.pl
parent8ec76589d1c43fdf57e1edb4fdd9c4bd6de32bce (diff)
downloadabi-dumper-78b7f9923f0b38c98ce6d37bc0542764692afa6f.tar.gz
Increased version of ABI dump format to 3.2
Diffstat (limited to 'abi-dumper.pl')
-rwxr-xr-xabi-dumper.pl14
1 files changed, 9 insertions, 5 deletions
diff --git a/abi-dumper.pl b/abi-dumper.pl
index 06ebbc4..5b40b37 100755
--- a/abi-dumper.pl
+++ b/abi-dumper.pl
@@ -1,6 +1,6 @@
#!/usr/bin/perl
###########################################################################
-# ABI Dumper 0.97
+# ABI Dumper 0.98
# Dump ABI of an ELF object containing DWARF debug info
#
# Copyright (C) 2013 ROSA Laboratory
@@ -19,7 +19,7 @@
#
# COMPATIBILITY
# =============
-# ABI Compliance Checker >= 1.99.1
+# ABI Compliance Checker >= 1.99.7
#
#
# This program is free software: you can redistribute it and/or modify
@@ -43,8 +43,8 @@ use Cwd qw(abs_path cwd realpath);
use Storable qw(dclone);
use Data::Dumper;
-my $TOOL_VERSION = "0.97";
-my $ABI_DUMP_VERSION = "3.1";
+my $TOOL_VERSION = "0.98";
+my $ABI_DUMP_VERSION = "3.2";
my $ORIG_DIR = cwd();
my $TMP_DIR = tempdir(CLEANUP=>1);
@@ -605,6 +605,11 @@ sub read_DWARF_Info($)
$SYS_ARCH = "x86";
}
+ if($SYS_ARCH=~/amd64/i)
+ { # amd64
+ $SYS_ARCH = "x86_64";
+ }
+
# source info
if($ExtraInfo) {
$ExtraPath = $ExtraInfo."/debug_line";
@@ -3017,7 +3022,6 @@ sub check_Completeness($)
if($TName=~/\A(true|false|\d.*)\Z/) {
next;
}
- my $Found = 0;
if(my $Tid = searchTypeID($TName)) {
check_TypeInfo($Tid);