DEFINITION MODULE CalcDisplay;

(* 


   Created: Duncan Prindle,  September 1, 1986

   Modified: Perhaps

*)

FROM CalcFunctions IMPORT ErrorType;

FROM Intuition     IMPORT WindowPtr;


TYPE  displayType = (BINARY, OCTAL, HEX, DECIMAL, SCIENTIFIC);

VAR   display : displayType;
      NDecDigits : INTEGER;
      NSciDigits : INTEGER;

PROCEDURE DisplayX( error : ErrorType;    wp    : WindowPtr  ) ;

END CalcDisplay.