src/HOL/Tools/old_primrec_package.ML
changeset 27691 ce171cbd4b93
parent 26939 1035c89b4c02
child 28308 d4396a28fb29
--- a/src/HOL/Tools/old_primrec_package.ML	Tue Jul 29 08:15:39 2008 +0200
+++ b/src/HOL/Tools/old_primrec_package.ML	Tue Jul 29 08:15:40 2008 +0200
@@ -308,9 +308,9 @@
 fun thy_note ((name, atts), thms) =
   PureThy.add_thmss [((name, thms), atts)] #-> (fn [thms] => pair (name, thms));
 fun thy_def false ((name, atts), t) =
-      PureThy.add_defs_i false [((name, t), atts)] #-> (fn [thm] => pair (name, thm))
+      PureThy.add_defs false [((name, t), atts)] #-> (fn [thm] => pair (name, thm))
   | thy_def true ((name, atts), t) =
-      PureThy.add_defs_unchecked_i false [((name, t), atts)] #-> (fn [thm] => pair (name, thm));
+      PureThy.add_defs_unchecked false [((name, t), atts)] #-> (fn [thm] => pair (name, thm));
 
 in