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
authorhaftmann
Thu, 27 Dec 2012 11:32:28 +0100
changeset 50618 36850cf745e7
parent 50617 9df2f825422b
child 50622 512dfe5e077f
tuned
src/Tools/Code/code_printer.ML file | annotate | diff | comparison | revisions 
--- a/src/Tools/Code/code_printer.ML	Wed Dec 26 11:06:21 2012 +0100
+++ b/src/Tools/Code/code_printer.ML	Thu Dec 27 11:32:28 2012 +0100
@@ -272,7 +272,7 @@
 
 fun applify opn cls f fxy_ctxt p [] = p
   | applify opn cls f fxy_ctxt p ps =
-      (if (fixity BR fxy_ctxt) then enclose "(" ")" else Pretty.block)
+      (if fixity BR fxy_ctxt then enclose "(" ")" else Pretty.block)
         (p @@ enum "," opn cls (map f ps));
 
 fun tuplify _ _ [] = NONE
isabelle