-- file PGSOps.Mesa
-- last edited by Satterthwaite, December 7, 1982 3:32 pm

DIRECTORY
  CommandUtil: TYPE USING [PairList],
  Strings: TYPE USING [String];

PGSOps: DEFINITIONS = {

  PGSPhase: TYPE = {format, lalr};

  Generate: PROC [
	source: Strings.String,
	args, results: CommandUtil.PairList,
	switches: Strings.String,
	startPhase: PROC [PGSPhase] RETURNS [BOOL],
	princOps: BOOL]
      RETURNS [success, warnings: BOOL];

  NoSource: ERROR;
  LockedSource: ERROR;
  BadSemantics: ERROR;

  }.