Return to setaddr.c CVS log

Up to [Research Unix] / researchv8dc / cmd / qed

Annotation of researchv8dc/cmd/qed/setaddr.c, revision 1.1.1.1

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.