src/Pure/ML-Systems/ml_pretty.ML

be more discriminate: some one-line Isar proofs are silly

(*  Title:      Pure/ML-Systems/ml_pretty.ML
    Author:     Makarius

Raw datatype for ML pretty printing.
*)

structure ML_Pretty =
struct

datatype pretty =
  Block of (string * string) * pretty list * int |
  String of string * int |
  Break of bool * int;

end;