Makes interactive proof scripting recognize the show_all_types flag.
--- 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 =