src/Pure/Isar/attrib.ML
changeset 31177 c39994cb152a
parent 31174 f1f1e9b53c81
child 31305 a16f4d4f5b24
     1.1 --- a/src/Pure/Isar/attrib.ML	Sun May 17 07:17:39 2009 +0200
     1.2 +++ b/src/Pure/Isar/attrib.ML	Mon May 18 09:48:06 2009 +0200
     1.3 @@ -123,7 +123,7 @@
     1.4  
     1.5  fun attribute thy = attribute_i thy o intern_src thy;
     1.6  
     1.7 -fun eval_thms ctxt args = ProofContext.note_thmss Thm.generated_theoremK
     1.8 +fun eval_thms ctxt args = ProofContext.note_thmss Thm.generatedK
     1.9      [(Thm.empty_binding, args |> map (fn (a, atts) =>
    1.10          (ProofContext.get_fact ctxt a, map (attribute (ProofContext.theory_of ctxt)) atts)))] ctxt
    1.11    |> fst |> maps snd;