00001 main(){} 00002 00003 f(i){i=f()+f();} 00004 00005 f2(i){i=f()+(i?f():1);} 00006 00007 f3(int i,int *p){register r1=0,r2=0,r3=0,r4=0,r5=0,r6=0,r7=0,r8=0,r9=0,r10=0;*p++=i?f():0;} 00008 00009 double a[10],b[10];int i;f4(){register r6=0,r7=0,r8=0,r9=0,r10=0,r11=0;i=a[i]+b[i] && i && a[i]-b[i];} 00010 /* f4 causes parent to spill child on vax when odd double regs are enabled */ 00011 00012 int j, k, m, n; 00013 double *A, *B, x; 00014 f5(){ 00015 x=A[k*m]*A[j*m]+B[k*n]*B[j*n]; 00016 x=A[k*m]*B[j*n]-B[k*n]*A[j*m]; 00017 }
1.3.9.1