changeset 30546 | b3b1f4184ae4 |
parent 30526 | 7f9a9ec1c94d |
child 31047 | c13b0406c039 |
--- a/doc-src/IsarRef/Thy/Spec.thy Mon Mar 16 17:47:26 2009 +0100 +++ b/doc-src/IsarRef/Thy/Spec.thy Mon Mar 16 17:48:02 2009 +0100 @@ -878,7 +878,7 @@ let val th' = th OF ths in th' end)) *} "my rule" - attribute_setup my_declatation = {* + attribute_setup my_declaration = {* Attrib.thms >> (fn ths => Thm.declaration_attribute (fn th: thm => fn context: Context.generic => let val context' = context