(* Copyright 1988 Michal Todorovic *)
(* For non-commercial use only.    *)

DEFINITION MODULE DosStuff;

CONST
  MaxGadgets = 44; (* Number of Gadgets.  Reduce this 
                      to the maximum number of gadgets you
                      need.  If you use a screen of higher
                      resolution than 640 by 200, then you 
                      can raise this number by 4 for every 
                      extra 15 pixels above 200 *)



TYPE
  LongString  = ARRAY [0..100] OF CHAR;
  ShortString = ARRAY [0..15] OF CHAR;

PROCEDURE GetInfo(VAR Paths : ARRAY OF LongString; 
                  VAR Name  : ARRAY OF ShortString;
                  VAR Memory: ARRAY OF CHAR; 
                  VAR Num : CARDINAL) : BOOLEAN;

END DosStuff.