Lines Matching refs:opcode
5112 local *opcode=shift;
5118 push @opcode,$rex|0x40 if($rex);
5123 my @opcode=(0x66);
5126 rex(\@opcode,$4,$3);
5127 push @opcode,0x0f,0x3a,0xdf;
5128 push @opcode,0xc0|($3&7)|(($4&7)<<3); # ModR/M
5130 push @opcode,$c=~/^0/?oct($c):$c;
5131 return ".byte\t".join(',',@opcode);
5140 rex(\@opcode,$3,$2);
5141 push @opcode,0x0f,0x38,$opcodelet{$1};
5142 push @opcode,0xc0|($2&7)|(($3&7)<<3); # ModR/M
5143 return ".byte\t".join(',',@opcode);
5152 push @opcode,0x44 if ($3>=8);
5153 push @opcode,0x0f,0x38,$opcodelet{$1};
5154 push @opcode,0x44|(($3&7)<<3),0x24; # ModR/M
5155 push @opcode,($off=~/^0/?oct($off):$off)&0xff;
5156 return ".byte\t".join(',',@opcode);
