Return to jfr.mail CVS log

Up to [Research Unix] / researchv10no / cmd / c2

Annotation of researchv10no/cmd/c2/jfr.mail, revision 1.1

1.1     ! root        1: From vax135!jfr  Tue Aug 26 15:19:15 1980
        !             2: I incorporated your changes to c2.
        !             3: However, I felt that things were getting out of hand when
        !             4: c2 used 7-digit numbers for labels it introduced,
        !             5: when there were no local labels in the input.
        !             6: [In the spirit of 16 bits, I made lgensym a 'long' array.
        !             7:  In the spirit of 32 bits, I changed alloc():
        !             8:        n = an;
        !             9:        n+=sizeof(char *)-1;
        !            10:        n &= ~(sizeof(char *)-1);
        !            11:        if (lasta+n >= lastr) {
        !            12: ]
        !            13: 
        !            14: Aug 26 14:18 1980  s.c20.c: -r1.34 vs. -r1.35 Page 1
        !            15: 
        !            16: 
        !            17: 13c13
        !            18: < long isn     = 2000000;
        !            19: ---
        !            20: > int  isn     = 20000;
        !            21: 17c17
        !            22: <   {100000,200000,300000,400000,500000,600000,700000,800000,900000,1000000};
        !            23: ---
        !            24: >   {100000L,200000L,300000L,400000L,500000L,600000L,700000L,800000L,900000L,1000000L};
        !            25: 131c131
        !            26: <                              if (isn<=p->labno) isn=1+p->labno;
        !            27: ---
        !            28: >                              if (p->labno<100000L && isn<=p->labno) isn=1+p->labno;
        !            29: 
        !            30: 

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