Lines Matching refs:code
14 # Performance is >30% better than gcc 3.3 generated code. But the real
30 # processor, as long as it's "z-CPU". Latter implies that the code
33 $kimdfunc=1; # magic function code for kimd instruction
70 $code.=<<___ if ($i==15);
75 $code.=<<___ if ($i<16);
79 $code.=<<___ if ($i>=16);
90 $code.=<<___ if ($i<=70);
101 $code.=<<___;
120 $code.=<<___;
138 $code.=<<___;
154 $code.=<<___;
165 $code.=<<___ if ($kimdfunc);
186 $code.=<<___;
208 $code.=<<___;
212 $code.=<<___; $K=$K_40_79;
216 $code.=<<___;
220 $code.=<<___;
243 $code =~ s/\`([^\`]*)\`/eval $1/gem;
245 print $code;
