src/Pure/Isar/isar_syn.ML
changeset 26048 f6f264ff2844
parent 25861 494d9301cc75
child 26184 64ee6a2ca6d6
--- a/src/Pure/Isar/isar_syn.ML	Thu Feb 07 14:39:19 2008 +0100
+++ b/src/Pure/Isar/isar_syn.ML	Sat Feb 09 12:56:10 2008 +0100
@@ -464,8 +464,8 @@
 val _ =
   OuterSyntax.command "overloading" "overloaded definitions" K.thy_decl
    (Scan.repeat1 (P.name --| (P.$$$ "\\<equiv>" || P.$$$ "==") -- P.term --
-      Scan.optional (P.$$$ "(" |-- (P.$$$ "unchecked" >> K false) --| P.$$$ ")") true)
-        --| P.begin
+      Scan.optional (P.$$$ "(" |-- (P.$$$ "unchecked" >> K false) --| P.$$$ ")") true
+      >> P.triple1) --| P.begin
    >> (fn operations => Toplevel.print o
          Toplevel.begin_local_theory true (TheoryTarget.overloading_cmd operations)));