src/Pure/display.ML
changeset 14178 14a12da7288e
parent 13658 c9ad3e64ddcf
child 14223 0ee05eef881b
--- a/src/Pure/display.ML	Sun Aug 31 21:24:29 2003 +0200
+++ b/src/Pure/display.ML	Sun Aug 31 21:27:58 2003 +0200
@@ -338,9 +338,9 @@
       (if sorts then pretty_varsT prop else []);
   in
     setmp show_no_free_types true
-      (setmp show_types (! show_types orelse ! show_sorts)
+      (setmp show_types (! show_types orelse ! show_sorts orelse ! show_all_types)
         (setmp show_sorts false pretty_gs))
-   (! show_types orelse ! show_sorts, ! show_sorts)
+   (! show_types orelse ! show_sorts orelse ! show_all_types, ! show_sorts)
   end;
 
 fun pretty_goals_marker bg n th =