Lines Matching refs:code
136 $code=<<___;
170 $code.=<<___;
214 $code.=<<___ if ($i==7);
217 $code.=<<___;
229 $code.=<<___;
278 $code.=" add \$16,$XX[0]#b\n" if ($i==15);
279 $code.=" movdqu ($inp),%xmm2\n" if ($i==15);
280 $code.=" add $TX[0]#b,$YY#b\n" if ($i<=0);
281 $code.=" movl ($dat,$YY,4),$TY#d\n";
282 $code.=" pxor %xmm0,%xmm2\n" if ($i==0);
283 $code.=" psllq \$8,%xmm1\n" if ($i==0);
284 $code.=" pxor $xmm,$xmm\n" if ($i<=1);
285 $code.=" movl $TX[0]#d,($dat,$YY,4)\n";
286 $code.=" add $TY#b,$TX[0]#b\n";
287 $code.=" movl `4*($j+1)`($XX[1]),$TX[1]#d\n" if ($i<15);
288 $code.=" movz $TX[0]#b,$TX[0]#d\n";
289 $code.=" movl $TY#d,4*$j($XX[1])\n";
290 $code.=" pxor %xmm1,%xmm2\n" if ($i==0);
291 $code.=" lea ($dat,$XX[0],4),$XX[1]\n" if ($i==15);
292 $code.=" add $TX[1]#b,$YY#b\n" if ($i<15);
293 $code.=" pinsrw \$`($j>>1)&7`,($dat,$TX[0],4),$xmm\n";
294 $code.=" movdqu %xmm2,($out,$inp)\n" if ($i==0);
295 $code.=" lea 16($inp),$inp\n" if ($i==0);
296 $code.=" movl ($XX[1]),$TX[1]#d\n" if ($i==15);
299 $code.=<<___;
306 $code.=".Loop16_enter:\n" if ($i==1);
310 $code.=<<___;
359 $code.=<<___;
378 $code.=<<___;
396 $code.=<<___;
409 $code.=<<___;
455 $code.=<<___;
568 $code.=<<___;
701 $code =~ s/(%[a-z0-9]+)#([bwd])/reg_part($1,$2)/gem;
702 $code =~ s/\`([^\`]*)\`/eval $1/gem;
704 print $code;
