Return to vldldptr.c CVS log

Up to [Research Unix] / researchv9 / jerq / sgs / libld

Annotation of researchv9/jerq/sgs/libld/vldldptr.c, revision 1.1.1.1

1.1       root        1: #include       <stdio.h>
                      2: #include       "filehdr.h"
                      3: #include       "ldfcn.h"
                      4: #include       "lddef.h"
                      5: 
                      6: int
                      7: vldldptr(ldptr)
                      8: 
                      9: LDFILE *ldptr;
                     10: 
                     11: {
                     12:     extern LDLIST      *_ldhead;
                     13: 
                     14:     LDLIST             *ldindx;
                     15: 
                     16:     for (ldindx = _ldhead; ldindx != NULL; ldindx = ldindx->ld_next) {
                     17:        if (ldindx == (LDLIST *) ldptr) {
                     18:            return(SUCCESS);
                     19:        }
                     20:     }
                     21: 
                     22:     return(FAILURE);
                     23: }
                     24: 
                     25: static char ID[ ] = "@(#) vldldptr.c: 1.1 1/8/82";

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