{$if not def EXEC_LISTS_H ***** EXEC/LISTS.H *****} CONST EXEC_LISTS_H=0; {$if not def 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} {$if not def 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:Str):p_Node; End; {$endif}