home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 25 / AACD 25.iso / AACD / Programming / yaec / modules / exec / lists.e < prev    next >
Encoding:
Text File  |  2001-08-12  |  387 b   |  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.