unit UtilityOld;

{------------------------------------------------------------------------}
{ utilityOld.lib

   - additional Includefile for reqtools-Includefile (KickPascal)
   - if you >are not< using OS2-Includes please install this file in your
     Include-Directory...
   - OS2-Include-users should use the original Includefile for
     >utility.library<                                                   }
{------------------------------------------------------------------------}

INTERFACE

uses Exec;

type
  p_Hook = ^Hook;
  Hook = record
           h_MinNode  : MinNode;
           h_Entry    : ^integer;
           h_SubEntry : ^integer;
           h_Data     : long;
         end;

  tag = long;

  p_TagItem = ^TagItem;
  TagItem = record
             ti_Tag  : Tag;
             ti_Data : long;
            end;

const
  TAG_DONE   = 0;
  TAG_END    = 0;
  TAG_IGNORE = 1;
  TAG_MORE   = 2;
  TAG_SKIP   = 3;
  TAG_USER   = $80000000;

  TAGFILTER_AND = 0;
  TAGFILTER_NOT = 1;

var UtilityBase : ptr;


IMPLEMENTATION

end.