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);
183 $code.=<<___;
205 $code.=<<___;
209 $code.=<<___; $K=$K_40_79;
213 $code.=<<___;
217 $code.=<<___;
240 $code =~ s/\`([^\`]*)\`/eval $1/gem;
242 print $code;