X-Git-Url: http://pileus.org/git/?a=blobdiff_plain;f=scripts%2Fmarkup_oops.pl;h=89774011965d7f17289b09af086c1651e9cf7ef1;hb=ddd559b13f6d2fe3ad68c4b3f5235fd3c2eae4e3;hp=528492bcba5bf73e8f809490c9d6d8c8ea821ec8;hpb=dc85ce155b7cad4c39c1fc95b4f6281920cef3c8;p=~andy%2Flinux diff --git a/scripts/markup_oops.pl b/scripts/markup_oops.pl index 528492bcba5..89774011965 100644 --- a/scripts/markup_oops.pl +++ b/scripts/markup_oops.pl @@ -1,6 +1,7 @@ #!/usr/bin/perl use File::Basename; +use Math::BigInt; # Copyright 2008, Intel Corporation # @@ -172,8 +173,8 @@ while () { parse_x86_regs($line); } -my $decodestart = hex($target) - hex($func_offset); -my $decodestop = hex($target) + 8192; +my $decodestart = Math::BigInt->from_hex("0x$target") - Math::BigInt->from_hex("0x$func_offset"); +my $decodestop = Math::BigInt->from_hex("0x$target") + 8192; if ($target eq "0") { print "No oops found!\n"; print "Usage: \n";