Lines Matching refs:_
21 my ($dir,$name,$type) = @_;
116 my $line = join(",",@_);
126 for (@_) {
132 { $hi=undef; $lo=$_; }
167 my @rest = @_;
170 @subst = map { vsr2vr1($_); } @subst;
181 my @out = _vsr2vr($num, @_);
191 my @out = _vsr2vr($num, @_);
197 my $vsel = sub { vsr2vr("vsel", 4, @_); };
198 my $vsl = sub { vsr2vr("vsl", 3, @_); };
199 my $vspltisb = sub { vsr2vr("vspltisb", 1, @_); };
200 my $vspltisw = sub { vsr2vr("vspltisw", 1, @_); };
201 my $vsr = sub { vsr2vr("vsr", 3, @_); };
202 my $vsro = sub { vsr2vr("vsro", 3, @_); };
205 my $lxsd = sub { vsr2vr("lxsd", 1, @_); };
212 my $cr = 0; $cr = shift if ($#_>1);
215 " .long ".sprintf "0x%x",31<<26|$cr<<23|$_[0]<<16|$_[1]<<11|64 :
216 " cmplw ".join(',',$cr,@_);
247 my ($f,$ra,$rs,$n,$b) = @_;
252 my ($f,$vx,$vy) = @_;
260 my ($f,$idx,$ra) = @_;
268 my ($f,$rd,$idx) = @_;
278 my ($f, $vrt, $ra, $rb, $op) = @_;
282 my $lvx_u = sub { vsxmem_op(@_, 844); }; # lxvd2x
283 my $stvx_u = sub { vsxmem_op(@_, 972); }; # stxvd2x
284 my $lvdx_u = sub { vsxmem_op(@_, 588); }; # lxsdx
285 my $stvdx_u = sub { vsxmem_op(@_, 716); }; # stxsdx
286 my $lvx_4w = sub { vsxmem_op(@_, 780); }; # lxvw4x
287 my $stvx_4w = sub { vsxmem_op(@_, 908); }; # stxvw4x
288 my $lvx_splt = sub { vsxmem_op(@_, 332); }; # lxvdsx
291 my ($f, $vrt, $vra, $vrb, $dm) = @_;
298 my ($f, $vrt, $vra, $vrb, $op) = vsr2vr_args(3, @_);
302 my ($f, $vrt, $vra, $vrb, $vrc, $op) = @_;
306 my ($f, $vrt, $vra, $vrb, $vrc, $op) = vsr2vr_args(4, @_);
310 my $vcipher = sub { vcrypto_op(@_, 1288); };
311 my $vcipherlast = sub { vcrypto_op(@_, 1289); };
312 my $vncipher = sub { vcrypto_op(@_, 1352); };
313 my $vncipherlast= sub { vcrypto_op(@_, 1353); };
314 my $vsbox = sub { vcrypto_op(@_, 0, 1480); };
315 my $vshasigmad = sub { my ($st,$six)=splice(@_,-2); vcrypto_op(@_, $st<<4|$six, 1730); };
316 my $vshasigmaw = sub { my ($st,$six)=splice(@_,-2); vcrypto_op(@_, $st<<4|$six, 1666); };
317 my $vpmsumb = sub { vcrypto_op(@_, 1032); };
318 my $vpmsumd = sub { vcrypto_op(@_, 1224); };
319 my $vpmsubh = sub { vcrypto_op(@_, 1096); };
320 my $vpmsumw = sub { vcrypto_op(@_, 1160); };
322 my $vaddudm = sub { vcrypto_op(@_, 192); };
323 my $vadduqm = sub { vcrypto_op(@_, 256); };
324 my $vmuleuw = sub { vcrypto_op(@_, 648); };
325 my $vmulouw = sub { vcrypto_op(@_, 136); };
326 my $vrld = sub { vcrypto_op(@_, 196); };
327 my $vsld = sub { vcrypto_op(@_, 1476); };
328 my $vsrd = sub { vcrypto_op(@_, 1732); };
329 my $vsubudm = sub { vcrypto_op(@_, 1216); };
330 my $vaddcuq = sub { vcrypto_op(@_, 320); };
331 my $vaddeuqm = sub { vfour_vsr(@_,60); };
332 my $vaddecuq = sub { vfour_vsr(@_,61); };
333 my $vmrgew = sub { vfour_vsr(@_,0,1932); };
334 my $vmrgow = sub { vfour_vsr(@_,0,1676); };
337 my ($f, $arg) = @_;
343 my ($f, $vrt, $ra) = @_;
347 my ($f, $vrt, $ra) = @_;
350 my $lvwzx_u = sub { vsxmem_op(@_, 12); }; # lxsiwzx
351 my $stvwx_u = sub { vsxmem_op(@_, 140); }; # stxsiwx
354 my $maddhdu = sub { vfour(@_,49); };
355 my $maddld = sub { vfour(@_,51); };
357 my ($f, $rt, $l) = @_;
361 my ($f, $rt, $ra, $rb) = @_;
366 my ($f, $vrt, $imm8) = @_;
374 my ($f, $rt, $ra, $rb, $cy) = @_; # only cy==0 is specified in 3.0B
377 my $vmsumudm = sub { vfour_vsr(@_, 35); };