--- a/src/Pure/Isar/attrib.ML Fri Jan 19 22:08:23 2007 +0100
+++ b/src/Pure/Isar/attrib.ML Fri Jan 19 22:08:24 2007 +0100
@@ -8,7 +8,6 @@
signature BASIC_ATTRIB =
sig
val print_attributes: theory -> unit
- val Attribute: bstring -> (Args.src -> attribute) -> string -> unit
end;
signature ATTRIB =
@@ -138,8 +137,6 @@
error ("Duplicate declaration of attributes(s) " ^ commas_quote dups);
in AttributesData.map add thy end;
-fun Attribute name att cmt = Context.>> (add_attributes [(name, att, cmt)]);
-
(** attribute parsers **)