Lines Matching refs:src
1004 my ($dst,$src,$rex)=@_;
1007 $rex|=0x01 if($src>=8);
1015 my ($src,$dst)=($1,$2);
1017 rex(\@opcode,$src,$dst,0x8);
1019 push @opcode,0xc0|(($src&7)<<3)|($dst&7); # ModR/M
1022 my ($src,$dst)=($2,$1);
1024 rex(\@opcode,$src,$dst,0x8);
1026 push @opcode,0xc0|(($src&7)<<3)|($dst&7); # ModR/M
1037 my $src=$2;
1041 rex(\@opcode,$src,$dst);
1043 push @opcode,0xc0|(($src&7)<<3)|($dst&7); # ModR/M
1055 my $src=$2;
1057 if ($src =~ /%r([0-9]+)/) { $src = $1; }
1058 elsif ($src =~ /%e/) { $src = $regrm{$src}; }
1059 rex(\@opcode,$dst,$src);
1061 push @opcode,0xc0|(($dst&7)<<3)|($src&7); # ModR/M