--- a/src/Pure/Syntax/mixfix.ML Sun Apr 15 23:25:49 2007 +0200
+++ b/src/Pure/Syntax/mixfix.ML Sun Apr 15 23:25:50 2007 +0200
@@ -154,8 +154,8 @@
| mixfix_args (Binder _) = 1
| mixfix_args Structure = 0;
-fun mixfixT (Binder _) = (TypeInfer.logicT --> TypeInfer.logicT) --> TypeInfer.logicT
- | mixfixT mx = replicate (mixfix_args mx) TypeInfer.logicT ---> TypeInfer.logicT;
+fun mixfixT (Binder _) = (dummyT --> dummyT) --> dummyT
+ | mixfixT mx = replicate (mixfix_args mx) dummyT ---> dummyT;
(* syn_ext_types *)