Return to locate.c CVS log

Up to [CSRG BSD Unix] / 43BSD / contrib / icon / rt

Annotation of 43BSD/contrib/icon/rt/locate.c, revision 1.1.1.1

1.1       root        1: #include "../h/rt.h"
                      2: #ifdef SETS
                      3: 
                      4: /*
                      5:  * locate - returns 1 if obj is in the hash chain which
                      6:  *  starts at ep in some set, returns 0 if not there
                      7:  *  (used only in diff.c and inter.c).
                      8:  */
                      9: 
                     10: locate(ep, obj)
                     11: struct b_selem *ep, *obj;
                     12:    {
                     13:    while (ep != NULL) {
                     14:       if (ep->hnum > obj->hnum)
                     15:           return 0;
                     16:       else if ((ep->hnum == obj->hnum) &&
                     17:                  (equiv(&ep->setmem, &obj->setmem)))
                     18:           return 1;
                     19:       ep = (struct b_selem *) BLKLOC(ep->sblink);
                     20:       }
                     21:    return 0;
                     22:    }
                     23: #else SETS
                     24: char junk;     /* prevent null object file */
                     25: #endif SETS

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