home *** CD-ROM | disk | FTP | other *** search
/ Gold Fish 3 / goldfish_volume_3.bin / files / dev / e / amigae / modulessrc / exec / lists.e < prev    next >
Text File  |  1995-07-05  |  387b  |  25 lines
  1. OPT MODULE
  2. OPT EXPORT
  3.  
  4. OPT PREPROCESS
  5.  
  6. MODULE 'exec/nodes'
  7.  
  8. #define IsListEmpty(x)    (x::mlh.tailpred = (x))
  9. #define IsMsgPortEmpty(x) (x::mp.ln.tailpred = x::mp.ln)
  10.  
  11. OBJECT lh
  12.   head:PTR TO ln
  13.   tail:PTR TO ln
  14.   tailpred:PTR TO ln
  15.   type:CHAR
  16.   pad:CHAR
  17. ENDOBJECT     /* SIZEOF=14 */
  18.  
  19. OBJECT mlh
  20.   head:PTR TO mln
  21.   tail:PTR TO mln
  22.   tailpred:PTR TO mln
  23. ENDOBJECT     /* SIZEOF=12 */
  24.  
  25.