src/Pure/ML-Systems/pp_dummy.ML
author wenzelm
Wed, 12 Aug 2015 13:53:51 +0200
changeset 60916 a6e2a667b0a8
parent 38635 f76ad0771f67
permissions -rw-r--r--
resolve undefined blobs by default, e.g. relevant for ML debugger to avoid reset of breakpoints after reload;

(*  Title:      Pure/ML-Systems/pp_dummy.ML

Dummy setup for toplevel pretty printing.
*)

fun ml_pretty _ = raise Fail "ml_pretty dummy";
fun pretty_ml _ = raise Fail "pretty_ml dummy";

structure PolyML =
struct
  fun addPrettyPrinter _ = ();
  fun prettyRepresentation _ =
    raise Fail "PolyML.prettyRepresentation dummy";
  open PolyML;
end;