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

DEFINITION MODULE BatchIntuition;

FROM Intuition IMPORT WindowPtr, GadgetPtr;
FROM DosStuff  IMPORT ShortString, LongString;

 

PROCEDURE OpenWin(VAR Win : WindowPtr; Gad : GadgetPtr;
                      H : INTEGER);

PROCEDURE CloseWin(VAR Win : WindowPtr);

PROCEDURE SetUpGadgets(Num : INTEGER; 
                       VAR Info : ARRAY OF ShortString;
                       VAR Top : INTEGER) : GadgetPtr;

END BatchIntuition.