# HG changeset patch # User Takahiro SHIMIZU # Date 1541403606 -32400 # Node ID b9a157e11952c1c8d6802159551f066c3379fd08 # Parent f873ae65aab1c80a74e115d874e3113fe320537e print opcode function diff -r f873ae65aab1 -r b9a157e11952 logs2.pl --- a/logs2.pl Mon Nov 05 16:36:31 2018 +0900 +++ b/logs2.pl Mon Nov 05 16:40:06 2018 +0900 @@ -1,6 +1,9 @@ use strict; use warnings; +use lib 'lib'; +use OPCODE2Function; + my $originlog = shift or die "use originlog cbclog"; my $cbclog = shift or die "use originlog cbclog"; @@ -28,9 +31,11 @@ if ($c_line != $orig_line){ print "*"; print "$orig_line : $c_line\n"; + print OPCODE2Function->codes($orig_line) ,":", OPCODE2Function->codes($c_line) ,"\n"; exit 0; } - + print "$orig_line : $c_line\n"; + print OPCODE2Function->codes($orig_line) ,":", OPCODE2Function->codes($c_line) ,"\n"; }