src/Pure/goal.ML
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