|
|
1.1 ! root 1: /*% cc -c -O % ! 2: */ ! 3: #include "vars.h" ! 4: extern noaddr; ! 5: setdot() ! 6: { ! 7: if (addr2 == 0) ! 8: addr1 = addr2 = dot; ! 9: if (addr1 > addr2) ! 10: error('$'); ! 11: } ! 12: setall() ! 13: { ! 14: if (noaddr) { ! 15: addr1 = zero+1; ! 16: addr2 = dol; ! 17: if (dol==zero) ! 18: addr1 = zero; ! 19: } ! 20: setdot(); ! 21: } ! 22: setnoaddr() ! 23: { ! 24: extern noaddr; ! 25: if (noaddr == FALSE) ! 26: error('$'); ! 27: } ! 28: nonzero() ! 29: { ! 30: if (addr1<=zero || addr2>dol) ! 31: error('$'); ! 32: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.