--- a/src/Tools/Code/code_printer.ML Sun Jun 23 22:31:50 2013 +0200
+++ b/src/Tools/Code/code_printer.ML Sun Jun 23 21:16:06 2013 +0200
@@ -233,11 +233,11 @@
fun fixity NOBR _ = false
| fixity _ NOBR = false
- | fixity (INFX (pr, lr)) (INFX (print_ctxt, lr_ctxt)) =
- pr < print_ctxt
- orelse pr = print_ctxt
+ | fixity (INFX (pr, lr)) (INFX (pr_ctxt, lr_ctxt)) =
+ pr < pr_ctxt
+ orelse pr = pr_ctxt
andalso fixity_lrx lr lr_ctxt
- orelse print_ctxt = ~1
+ orelse pr_ctxt = ~1
| fixity BR (INFX _) = false
| fixity _ _ = true;