home *** CD-ROM | disk | FTP | other *** search
/ Amiga MA Magazine 1998 #6 / amigamamagazinepolishissue1998.iso / coders / collector / mark.inline < prev    next >
Text File  |  1995-03-31  |  174b  |  8 lines

  1. (* === Mark * (this : CollectorS.ElementP) === *)
  2.  
  3.   IF (this # NIL) & ~(CollectorS.black IN this.ecFlags) THEN
  4.     INCL(this.ecFlags, CollectorS.Grey);
  5.   END;
  6.  
  7. (* ====== *)
  8.