LoadParseTreePrintTest.cm

Install StructuredStreams StatementInterpreter ParseTreePrinting

{ LexFile: PROC [fileName: ROPE] RETURNS [pt: EDIFfing.ParseTree] = {s: IO.STREAM = FS.StreamOpen[fileName: fileName, accessOptions: read, extendFileProc: NIL]; source: EDIFfing.Source = NEW [EDIFfing.SourcePrivate ← [description: Rope.Cat["file ", fileName], data: s]]; pt ← EDIFfing.LexEDIF[source, s]; IO.Close[s]}; NULL}