Lines Matching refs:opcode
577 { my $opcode = $AUTOLOAD; $opcode =~ s/.*:://;
580 $code .= "\t$opcode\t".join(',',$arg,reverse @_)."\n";
2097 my @opcode=(0x0f,0x3a,0xcc);
2098 push @opcode,0xc0|($2&7)|(($3&7)<<3); # ModR/M
2100 push @opcode,$c=~/^0/?oct($c):$c;
2101 return ".byte\t".join(',',@opcode);
2115 my @opcode=(0x0f,0x38);
2119 unshift @opcode,0x40|$rex if ($rex);
2120 push @opcode,$opcodelet{$instr};
2121 push @opcode,0xc0|($1&7)|(($2&7)<<3); # ModR/M
2122 return ".byte\t".join(',',@opcode);