home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD2.mdf / c / library / dos / diverses / leda / src / basic / _slist.c < prev    next >
Encoding:
C/C++ Source or Header  |  1991-11-15  |  2.2 KB  |  107 lines
  1. /*******************************************************************************
  2. +
  3. +  LEDA  2.1.1                                                 11-15-1991
  4. +
  5. +
  6. +  _slist.c
  7. +
  8. +
  9. +  Copyright (c) 1991  by  Max-Planck-Institut fuer Informatik
  10. +  Im Stadtwald, 6600 Saarbruecken, FRG     
  11. +  All rights reserved.
  12. + 
  13. *******************************************************************************/
  14.  
  15.  
  16. #include <LEDA/slist.h>
  17.  
  18. //------------------------------------------------------------------------------
  19. // Members of class SLIST
  20. //------------------------------------------------------------------------------
  21.  
  22. SLIST::SLIST()      
  23. { h=0; 
  24.   t=0;
  25.   count=0;
  26.   iterator=0; 
  27. }
  28.  
  29. SLIST::SLIST(ent a) 
  30. { h=t=new slink(a,0);
  31.   count=1; 
  32.   iterator=0;  
  33. }
  34.  
  35. SLIST::SLIST(const SLIST& x)
  36. { slink* p = x.h;
  37.   h=0; 
  38.   t=0; 
  39.   count=0; 
  40.   iterator=0;
  41.   while (p) { append(p->e);     //copy new list
  42.               p = p->succ;}
  43. }
  44.  
  45. void SLIST::pop()    
  46. { if (iterator!=0) error_handler(1,"pop: deletion while iterator is active");
  47.   if (h) 
  48.   { if (t==h) t = 0;
  49.     slink* x=h; 
  50.     h=x->succ; 
  51.     clear_el(x->e);
  52.     delete x;
  53.     count--;
  54.    }
  55. }
  56.  
  57. slink* SLIST::push(ent a)   
  58. { if (iterator!=0) error_handler(2,"push: insertion while iterator is active");
  59.   copy_el(a);
  60.   count++;
  61.   h = new slink(a,h); 
  62.   if (t==0) t = h;
  63.   return h;
  64. }
  65.  
  66. slink* SLIST::append(ent a)
  67. { if (iterator!=0) error_handler(2,"append: insertion while iterator is active");
  68.   count++;
  69.   copy_el(a);
  70.   slink* p = new slink(a,0); 
  71.   if (t) t->succ = p; 
  72.   else   h = p;
  73.   return t=p;
  74. } 
  75.  
  76. slink* SLIST::append(SLIST& l)
  77. { if (iterator!=0) error_handler(2,"append: insertion while iterator is active");
  78.   slink* p = l.h;
  79.   while(p) { append(p->e);
  80.              p = p->succ;  }
  81.   return h;
  82. } 
  83.  
  84. slink* SLIST::cyclic_succ(slink* loc) const
  85. { if (loc==0) return 0;
  86.   return loc->succ? loc->succ : h;
  87. }
  88.  
  89. SLIST& SLIST::operator=(const SLIST& x)
  90. { slink* p = x.h;
  91.   iterator=0;
  92.   while (h) pop();              //destroy old list
  93.   while (p) { append(p->e);     //copy new list
  94.               p = p->succ;}
  95.   return *this;
  96. }
  97.  
  98. SLIST SLIST::operator+(SLIST x)  // concatenation
  99. { append(x);
  100.   return this;
  101. }
  102.  
  103. void SLIST::clear()
  104. { while (h) pop(); 
  105.   iterator=0;
  106. }
  107.