Lines Matching refs:code
27 $code=<<___;
59 local *code=shift;
64 $code.=<<___ if ($i==0);
72 $code.=<<___;
98 $code.=<<___;
125 local *code=shift;
130 $code.=<<___;
154 local *code=shift;
161 $code.=<<___;
182 $code.=<<___;
203 local *code=shift;
208 $code.=<<___;
232 $code.=<<___;
287 for($i=0;$i<16;$i++) { &BODY_00_15(\$code,$i,@V); unshift(@V,pop(@V)); }
288 for(;$i<20;$i++) { &BODY_16_19(\$code,$i,@V); unshift(@V,pop(@V)); }
289 for(;$i<40;$i++) { &BODY_20_39(\$code,$i,@V); unshift(@V,pop(@V)); }
290 for(;$i<60;$i++) { &BODY_40_59(\$code,$i,@V); unshift(@V,pop(@V)); }
291 for(;$i<80;$i++) { &BODY_60_79(\$code,$i,@V); unshift(@V,pop(@V)); }
296 $code.=<<___;
315 print $code;
