defs: name mandatory;
authorwenzelm
Sat, 25 Sep 1999 13:18:20 +0200
changeset 7603 b2b5599b934f
parent 7602 2c0f407f80ce
child 7604 55566b9ec7d7
defs: name mandatory;
src/Pure/Isar/isar_syn.ML
--- a/src/Pure/Isar/isar_syn.ML	Sat Sep 25 13:17:38 1999 +0200
+++ b/src/Pure/Isar/isar_syn.ML	Sat Sep 25 13:18:20 1999 +0200
@@ -161,7 +161,7 @@
 
 val defsP =
   OuterSyntax.command "defs" "define constants" K.thy_decl
-    (Scan.repeat1 (P.spec_opt_name -- P.marg_comment) >> (Toplevel.theory o IsarThy.add_defs));
+    (Scan.repeat1 (P.spec_name -- P.marg_comment) >> (Toplevel.theory o IsarThy.add_defs));
 
 val constdefsP =
   OuterSyntax.command "constdefs" "declare and define constants" K.thy_decl