changeset 20157 | 28638d2a6bc7 |
parent 20056 | 0698a403a066 |
child 20228 | e0f9e8a6556b |
--- a/src/Pure/goal.ML Wed Jul 19 12:11:59 2006 +0200 +++ b/src/Pure/goal.ML Wed Jul 19 12:12:00 2006 +0200 @@ -138,7 +138,7 @@ val ctxt' = ctxt |> Variable.set_body false |> (snd o Variable.add_fixes xs) - |> fold Variable.declare_term (asms @ props); + |> fold Variable.declare_internal (asms @ props); val res = (case SINGLE (tac prems) (init (cert_safe prop)) of