JunoOldUnparser.mesa (was OldUnparser.mesa)
Last edited September 9, 1982 5:44 pm
Last Edited by: Gnelson, October 11, 1983 9:23 pm
Last Edited by: Stolfi March 13, 1984 3:05:25 am PST
Unparses a symbolic expression f and produces a rope. The designated subexpression culprit is bracketed in the resulting rope by a pair of ascii nulls. To avoid this, make no subexpression of f equal to culprit.
DIRECTORY Rope, ParseTable;
OldUnparser: DEFINITIONS =
BEGIN
Unparse: PROC[f: REF ANY, -- unparses Car[f], not f!
culprit: REF ANY,
margin: INTEGER,
p: ParseTable.Handle,
openCount: INT]
RETURNS [Rope.ROPE];
LexemeToRope: PROC[f: REF ANY] RETURNS [Rope.ROPE];
END.