Lines Matching refs:instr
13 my ($addr, $bytes, $instr) = ($1, $2, $4);
16 $instr =~ s/\s*(.*\S)\s*/$1/;
17 push (@result, {'addr' => $addr, 'bytes' => $bytes, 'instr' => $instr});
18 print "addr=$addr bytes='$bytes' instr='$instr'\n" if $DEBUG;
33 my ($addr, $bytes, $instr) = ($1, $3, $2);
37 $instr =~ s/\s*(.*\S)\s*/$1/;
38 push (@result, {'addr' => $addr, 'bytes' => $bytes, 'instr' => $instr});
39 print "addr=$addr bytes='$bytes' instr='$instr'\n" if $DEBUG;
43 my ($addr, $bytes, $instr) = ($got_addr, $2, $1);
47 $instr =~ s/\s*(.*\S)\s*/$1/;
48 push (@result, {'addr' => $addr, 'bytes' => $bytes, 'instr' => $instr});
49 print "addr=$addr bytes='$bytes' instr='$instr'\n" if $DEBUG;
66 next if (($d1->{'instr'} eq $d2->{'instr'}) && $opt_d);
67 printf "0x%08x:\t%30s \t%s\n", 0+$d1->{'addr'}, $d1->{'bytes'}, $d1->{'instr'};
68 printf "0x%08x:\t%30s \t%s\n\n", 0+$d2->{'addr'}, $d2->{'bytes'}, $d2->{'instr'};
