{$ifndef EXEC_LISTS_H ***** EXEC/LISTS.H *****} CONST EXEC_LISTS_H = 0; {$ifndef EXEC_NODES_H;incl"exec/nodes.h";endif} TYPE p_List = ^List; List = record lh_Head, lh_Tail, lh_TailPred: p_Node; lh_Type, l_pad: Byte; end; p_MinList = ^MinList; MinList = record mlh_Head, mlh_Tail, mlh_TailPred: p_MinNode; end; {$endif} {$ifndef EXEC_LISTS_LIB} Const EXEC_LISTS_LIB = 0; Library SysBase: -234: Procedure Insert(a0: p_List; a1,a2: p_Node); -240: Procedure AddHead(a0: p_List; a1: p_Node); -246: Procedure AddTail(a0: p_List; a1: p_Node); -252: Procedure Remove(a1: p_Node); -258: Procedure RemHead(a0: p_List); -264: Procedure RemTail(a0: p_List); -270: Procedure Enqueue(a0: p_List; a1: p_Node); -276: Function FindName(a0: p_List; a1: stryng): p_Node; end; {$endif}