home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Pascal / MAXONPASCAL2.DMS / in.adf / INCLUDE / exec / lists.h < prev    next >
Encoding:
Text File  |  1994-07-25  |  596 b   |  27 lines
  1. {$if not def EXEC_LISTS_H} CONST EXEC_LISTS_H=0;
  2.  
  3. { **************************************************************
  4.   ** KickPascal-Include-Datei "exec/lists.h" zu Kickstart 3.0 **
  5.   ************************************************************** }
  6.  
  7. TYPE p_MinList = ^MinList;
  8. TYPE p_List = ^List;
  9.  
  10. {$if not def EXEC_NODES_H;incl "exec/nodes.h";endif}
  11.  
  12. TYPE List = RECORD
  13.  lh_Head     : p_Node;
  14.  lh_Tail     : p_Node;
  15.  lh_TailPred : p_Node;
  16.  lh_Type     : Byte;
  17.  l_pad       : Byte;
  18. END;
  19.  
  20. TYPE MinList = RECORD
  21.  mlh_Head     : p_Node;
  22.  mlh_Tail     : p_Node;
  23.  mlh_TailPred : p_Node;
  24. END;
  25.  
  26. {$endif}
  27.