src/Pure/Isar/isar_cmd.ML
changeset 57683 cc0aa6528890
parent 57605 8e0a7eaffe47
child 57934 5e500c0e7eca
--- a/src/Pure/Isar/isar_cmd.ML	Fri Jul 25 14:47:38 2014 +0200
+++ b/src/Pure/Isar/isar_cmd.ML	Fri Jul 25 15:01:18 2014 +0200
@@ -154,11 +154,12 @@
 (* old-style defs *)
 
 fun add_defs ((unchecked, overloaded), args) thy =
+ (legacy_feature "Old 'defs' command -- use 'definition' (with 'overloading') instead";
   thy |>
     (if unchecked then Global_Theory.add_defs_unchecked_cmd else Global_Theory.add_defs_cmd)
       overloaded
       (map (fn ((b, ax), srcs) => ((b, ax), map (Attrib.attribute_cmd_global thy) srcs)) args)
-  |> snd;
+  |> snd);
 
 
 (* declarations *)