home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / E / TFF-A32R.LZX / AmigaE3.2a / ModulesSrc / exec / lists.e < prev    next >
Encoding:
Text File  |  1996-08-29  |  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.