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;