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     ! 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.