|
DataMuseum.dkPresents historical artifacts from the history of: DKUUG/EUUG Conference tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about DKUUG/EUUG Conference tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: T s
Length: 970 (0x3ca) Types: TextFile Names: »set_find.c«
└─⟦2d1937cfd⟧ Bits:30007241 EUUGD22: P.P 5.0 └─⟦35176feda⟧ »EurOpenD22/isode/isode-6.tar.Z« └─⟦de7628f85⟧ └─⟦this⟧ »isode-6.0/psap/set_find.c«
/* set_find.c - find member of a set */ #ifndef lint static char *rcsid = "$Header: /f/osi/psap/RCS/set_find.c,v 7.0 89/11/23 22:13:41 mrose Rel $"; #endif /* * $Header: /f/osi/psap/RCS/set_find.c,v 7.0 89/11/23 22:13:41 mrose Rel $ * * * $Log: set_find.c,v $ * Revision 7.0 89/11/23 22:13:41 mrose * Release 6.0 * */ /* * NOTICE * * Acquisition, use, and distribution of this module and related * materials are subject to the restrictions of a license agreement. * Consult the Preface in the User's Manual for the full terms of * this agreement. * */ /* LINTLIBRARY */ #include <stdio.h> #include "psap.h" /* \f */ PE set_find (pe, class, id) register PE pe; register PElementClass class; register PElementID id; { register int pe_id; register PE p; pe_id = PE_ID (class, id); for (p = pe -> pe_cons; p; p = p -> pe_next) if (PE_ID (p -> pe_class, p -> pe_id) == pe_id) break; return p; }