Return to P.i CVS log

Up to [Research Unix] / researchv10no / cmd / ccom / vax / tests

Annotation of researchv10no/cmd/ccom/vax/tests/P.i, revision 1.1

1.1     ! root        1: typedef struct { int x, y;} Point;
        !             2: extern Point map(), a, b, c;
        !             3: main ()
        !             4: {      register Point *pt, *ppt;
        !             5:        Point x, y, z;
        !             6:        x = y = z;
        !             7:        *pt++ = map (*ppt++);
        !             8:        a = b = c;
        !             9:        (void) map(a = b = c);
        !            10:        if((a = x = map()).y)
        !            11:                ;
        !            12:        if((b = a = map()).y)
        !            13:                ;
        !            14: }
        !            15: struct a {long p, q; char s;};
        !            16: struct a f();
        !            17: x0x()
        !            18: {      struct a v, x, y;
        !            19:        if((v=f()).s);
        !            20:        v = x = y;
        !            21:        return(f().s);
        !            22: }
        !            23: a22(){
        !            24:        double d;
        !            25:        int i, j;
        !            26:        short x, y;
        !            27:        x = x/y;
        !            28:        x /= y;
        !            29:        i /= d;
        !            30:        j = i / d;
        !            31:        j = i * d; i *= d;
        !            32: }

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