home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / lclint.zip / lclint-2_3h-os2-bin.zip / test / db2 / ereftab.c < prev    next >
Text File  |  1997-09-03  |  734b  |  47 lines
  1. /*
  2. ** This is not a good implementation.  I should probably replace
  3. ** the erc with a hash table.  
  4. */
  5.  
  6. # include "ereftab.h"
  7.  
  8. ereftab ereftab_create (void) 
  9. {
  10.   return erc_create ();
  11. }
  12.  
  13. void ereftab_insert (ereftab t, employee e, eref er) 
  14. {
  15.   eref_assign (er, e);
  16.   erc_insert (t, er);
  17. }
  18.  
  19. bool ereftab_delete (ereftab t, eref er) 
  20. {
  21.   bool result;
  22.   
  23.   result = erc_member (er, t);  
  24.   erc_delete (t, er);
  25.   return result;
  26. }
  27.  
  28. eref ereftab_lookup (employee e, ereftab t) 
  29. {
  30.   employee e1;
  31.  
  32.   ereftab_elements(t, er)
  33.     {
  34.       e1 = eref_get(er);
  35.       if (employee_equal(&e, &e1)) return er;
  36.     } end_ereftab_elements ;
  37.   return erefNIL;
  38. }
  39.  
  40. void ereftab_initMod (void) 
  41. {
  42.   bool_initMod ();
  43.   eref_initMod ();
  44.   erc_initMod ();
  45. }
  46.  
  47.