Lines Matching refs:_

20     die "more than 4 arguments passed to $opcode" if ($#_>3);
26     &generic($opcode,@_) or die "undefined subroutine \&$AUTOLOAD";
32     if ($#_==-1)    { push(@out,"\t$opcode\n");				}
33     else            { push(@out,"\t$opcode\t".join(',',@_)."\n");	}
37 {   $_[0] =~ m/^e?([a-d])x$/o or die "$_[0] does not have a 'low byte'";
41 {   $_[0] =~ m/^e?([a-d])x$/o or die "$_[0] does not have a 'high byte'";
44 sub ::stack_push{ my $num=$_[0]*4; $stack+=$num; &sub("esp",$num);	}
45 sub ::stack_pop	{ my $num=$_[0]*4; $stack-=$num; &add("esp",$num);	}
46 sub ::blindpop	{ &pop($_[0]); $stack+=4;				}
47 sub ::wparam	{ &DWP($stack+4*$_[0],"esp");				}
48 sub ::swtmp	{ &DWP(4*$_[0],"esp");					}
52     {	&comment("bswap @_");
53 	&xchg(&HB(@_),&LB(@_));
54 	&ror (@_,16);
55 	&xchg(&HB(@_),&LB(@_));
58     {	&generic("bswap",@_);	}
62 sub ::movb	{ &mov(@_);	}
63 sub ::xorb	{ &xor(@_);	}
64 sub ::rotl	{ &rol(@_);	}
65 sub ::rotr	{ &ror(@_);	}
66 sub ::exch	{ &xchg(@_);	}
68 sub ::movz	{ &movzx(@_);	}
74 { my($p1,$p2,$optimize)=@_;
80     {	&::generic("movq",@_);			}
87 { my($dst,$src,$imm)=@_;
91     {	&::generic("pextrd",@_);		}
95 { my($dst,$src,$imm)=@_;
99     {	&::generic("pinsrd",@_);		}
103 { my($dst,$src)=@_;
107     {	&::generic("pshufb",@_);		}
111 { my($dst,$src,$imm)=@_;
115     {	&::generic("palignr",@_);		}
119 { my($dst,$src,$imm)=@_;
123     {	&::generic("pclmulqdq",@_);		}
127 { my ($dst)=@_;
131     {	&::generic("rdrand",@_);	}
140     foreach $i (values %label) { return $i if ($i eq $_[0]); }
141   $label{$_[0]};	# can be undef
145 {   if (!defined($label{$_[0]}))
146     {	$label{$_[0]}="${lbdecor}${label}${_[0]}"; $label++;   }
147   $label{$_[0]};
151 {   $label{$_[0]}=$_[1] if (!defined($label{$_[0]}));
152   $label{$_[0]};
155 sub ::static_label	{ &::LABEL($_[0],$lbdecor.$_[0]); }
157 sub ::set_label_B	{ push(@out,"@_:\n"); }
159 { my $label=&::label($_[0]);
160     &::align($_[1]) if ($_[1]>1);
172 {   &function_begin_B(@_);
186     &function_end_B(@_);
216 { my ($type,$fn,$cpu)=@_;