Mercurial Mercurial > repos > isabelle / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | gz | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
tuned output;
authorwenzelm
Sun, 03 May 2015 18:13:15 +0200
changeset 60246 1f9cd721ece2
parent 60245 79ad597fe699
child 60247 6a5015b096a2
tuned output;
src/Pure/Isar/class.ML file | annotate | diff | comparison | revisions
src/Pure/Isar/overloading.ML file | annotate | diff | comparison | revisions 
--- a/src/Pure/Isar/class.ML	Sun May 03 17:52:27 2015 +0200
+++ b/src/Pure/Isar/class.ML	Sun May 03 18:13:15 2015 +0200
@@ -588,7 +588,10 @@
       Pretty.block (Pretty.breaks
         [Pretty.str v, Pretty.str "==", Proof_Context.pretty_const lthy c,
           Pretty.str "::", Syntax.pretty_typ lthy ty]);
-  in Pretty.keyword1 "instantiation" :: map pr_arity tycos @ map pr_param params end;
+  in
+    [Pretty.block
+      (Pretty.fbreaks (Pretty.keyword1 "instantiation" :: map pr_arity tycos @ map pr_param params))]
+  end;
 
 fun conclude lthy =
   let
@@ -754,4 +757,3 @@
   else [];
 
 end;
-
--- a/src/Pure/Isar/overloading.ML	Sun May 03 17:52:27 2015 +0200
+++ b/src/Pure/Isar/overloading.ML	Sun May 03 18:13:15 2015 +0200
@@ -174,7 +174,10 @@
       Pretty.block (Pretty.breaks
         [Pretty.str v, Pretty.str "==", Proof_Context.pretty_const lthy c,
           Pretty.str "::", Syntax.pretty_typ lthy ty]);
-  in Pretty.keyword1 "overloading" :: map pr_operation overloading end;
+  in
+    [Pretty.block
+      (Pretty.fbreaks (Pretty.keyword1 "overloading" :: map pr_operation overloading))]
+  end;
 
 fun conclude lthy =
   let
isabelle