Lines Matching refs:code
12 # turned to be 40% faster than 64-bit code generated by Sun C 5.8 and
13 # >2x than 64-bit code generated by gcc 3.4. And there is a gimmick.
16 # instruction sequence, thus minimizing the window when the code is
56 $code.=<<___;
71 $code.=
74 $code.=<<___;
84 $code.=<<___;
90 $code.=<<___;
117 $code.="\tsrlx @X[($i/2)%8],32,$xi\n";
119 $code.=<<___;
141 $code.="\tsrlx @X[($i/2)%8],32,$xi\n";
143 $code.=<<___;
164 $code.="\tsrlx @X[($i/2)%8],32,$xi\n";
166 $code.=<<___;
181 $code.=<<___ if ($bits==64);
185 $code.=<<___;
233 { $code.=<<___;
239 $code.=<<___;
250 $code.=<<___;
282 $code =~ s/\`([^\`]*)\`/eval $1/gem;
283 print $code;