DIRECTORY BasicTime, Core, MakeDo, Rope, RoseBindPrivate; RoseTranslate: CEDAR DEFINITIONS = BEGIN ROPE: TYPE = Rope.ROPE; TypeString: TYPE = ROPE; Gend: TYPE = {Defs, Private}; GendPgmPostfixes: ARRAY Gend OF ROPE; translatorTime: BasicTime.GMT; translatorVersion: ROPE; EnumerateGeneratedStamps: PROC [mr: RoseBindPrivate.ModuleRoot, g: Gend, to: PROC [behaviorClassName: ROPE, typeString: TypeString]] RETURNS [translatorStamp: ROPE _ NIL]; TypeStringFromClass: PROC [bc: RoseBindPrivate.BehaviorClass] RETURNS [ts: TypeString]; CompareTypeStrings: PROC [a, b: TypeString] RETURNS [differenceReport: ROPE--NIL means equal--]; GetTranslateCommand: PROC [moduleNameRoot: ROPE] RETURNS [cmd: ROPE]; END. ¬RoseTranslate.mesa Copyright c 1985 by Xerox Corporation. All rights reversed. Barth, September 5, 1985 6:40:39 pm PDT Spreitzer, September 26, 1985 7:32:57 pm PDT Ê^– "cedar" style˜code– "Cedar" stylešœ™Kšœ Ïmœ1™