-- MDComp.Mesa, last edit January 6, 1983 2:12 pm
-- Pilot 6.0/ Mesa 7.0
-- procedures to determine compilation, etc. for the system modeller

DIRECTORY
  IO: TYPE USING[Handle],
  MDModel: TYPE USING [LOCSymbol, MODELSymbol, Symbol, SymbolSeq],
  Subr: TYPE USING [TTYProcs],
  TypeScript: TYPE USING[TS];
				
MDComp: DEFINITIONS = {


-- called from MDMainImpl
DetermineRecomp: PROC[sproot: MDModel.Symbol, symbolseq: MDModel.SymbolSeq,
	officialwindow: Subr.TTYProcs, uniquename, tryreplacement: BOOL, 
	confirm: REF BOOL, typeScript: TypeScript.TS, ttyin, ttyout, msgout: IO.Handle] 
	RETURNS[wascompiled, didfail: BOOL];
	
-- called from MDMainImpl and internally by MDCompImpl
NewBind: PROC[sproot: MDModel.MODELSymbol, symbolseq: MDModel.SymbolSeq,
	needsconfig, uniquename: BOOL, confirm: REF BOOL, 
	modelfile: LONG STRING, modelcreate: LONG CARDINAL, 
	officialwindow: Subr.TTYProcs, typeScript: TypeScript.TS, 
	ttyin, ttyout, msgout: IO.Handle] 
	RETURNS[successful: BOOL];

-- called from MDDBImpl, MDLoadImpl, and RCompImpl, and internally in MDCompImpl
SetVersAndModulename: PROC[sploc: MDModel.LOCSymbol];

-- called by MDLoadImpl and internally in MDCompImpl
HandlePlus: PROC[symbolseq: MDModel.SymbolSeq];

}.