prettier.def

来自「一个Modula-2语言分析器」· DEF 代码 · 共 29 行

DEFINITION MODULE Prettier;
(* Pretty printing auxiliary functions for use with Taste pretty printing
   program generated by COCO from an attributed grammar
   P.D. Terry, Rhodes University, 17 May 1991 *)

  IMPORT FileIO;

  VAR
    results : FileIO.File;

  PROCEDURE Append (String : ARRAY OF CHAR);
  (* Append String to results file *)

  PROCEDURE IndentNextLine;
  (* Write line mark to results file and prepare to indent further lines
     by two spaces more than before *)

  PROCEDURE ExdentNextLine;
  (* Write line mark to results file and prepare to indent further lines
     by two spaces less *)

  PROCEDURE NewLine;
  (* Write line mark to results file but leave indentation as before *)

  PROCEDURE Indent;
  PROCEDURE Exdent;

  END Prettier.