Return to spill.c CVS log

Up to [Research Unix] / researchv10no / cmd / lcc / tst

Annotation of researchv10no/cmd/lcc/tst/spill.c, revision 1.1

1.1     ! root        1: main(){}
        !             2: 
        !             3: f(i){i=f()+f();}
        !             4: 
        !             5: f2(i){i=f()+(i?f():1);}
        !             6: 
        !             7: 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;}
        !             8: 
        !             9: 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];}
        !            10: /* f4 causes parent to spill child on vax when odd double regs are enabled */
        !            11: 
        !            12: int j, k, m, n;
        !            13: double *A, *B, x;
        !            14: f5(){
        !            15:        x=A[k*m]*A[j*m]+B[k*n]*B[j*n];
        !            16:        x=A[k*m]*B[j*n]-B[k*n]*A[j*m];
        !            17: }  

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.