src/Pure/ML/ml_print_depth0.ML
changeset 62900 c641bf9402fd
parent 62878 1cec457e0a03
--- a/src/Pure/ML/ml_print_depth0.ML	Thu Apr 07 13:35:08 2016 +0200
+++ b/src/Pure/ML/ml_print_depth0.ML	Thu Apr 07 13:54:02 2016 +0200
@@ -8,7 +8,6 @@
 sig
   val set_print_depth: int -> unit
   val get_print_depth: unit -> int
-  val get_print_depth_default: int -> int
 end;
 
 structure ML_Print_Depth: ML_PRINT_DEPTH =
@@ -18,6 +17,5 @@
 
 fun set_print_depth n = (depth := n; PolyML.print_depth n);
 fun get_print_depth () = ! depth;
-fun get_print_depth_default _ = ! depth;
 
 end;