erc.h

# ifndef ERC_H
# define ERC_H
 
#include "eref.h"
 
typedef struct _elem { eref val; struct _elem *next; } ercElem;
typedef ercElem *ercList;
typedef struct { ercList vals; int size; } ercInfo;
typedef ercInfo *erc;
typedef ercList *ercIter;
 
#include "erc.lh"
 
# define erc_size(c) ((c)->size)
# define erc_choose(c) ((c->vals)->val)
# define erc_initMod() \
    do { bool_initMod(); employee_initMod();\
         eref_initMod(); } while (0)
 
# define erc_iterFinal(it) (free(it)) 
 
# define erc_iterReturn(it, result) \
    do { erc_iterFinal(it); return result; } while (0)
 
# define for_ercElems(er, it, c)\
    for (er = erc_yield (it = erc_iterStart (c)); \
         !eref_equal (er, erefNIL); \
         er = erc_yield (it))
 
# endif