prove: full Variable.declare_term, including constraints;
authorwenzelm
Sat, 14 Jun 2008 23:20:11 +0200
changeset 27218 4548c83cd508
parent 27217 ddce31131fee
child 27219 a248dba028ff
prove: full Variable.declare_term, including constraints;
src/Pure/goal.ML
--- a/src/Pure/goal.ML	Sat Jun 14 23:20:10 2008 +0200
+++ b/src/Pure/goal.ML	Sat Jun 14 23:20:11 2008 +0200
@@ -120,7 +120,7 @@
 
     val (prems, ctxt') = ctxt
       |> Variable.add_fixes_direct xs
-      |> fold Variable.declare_internal (asms @ props)
+      |> fold Variable.declare_term (asms @ props)
       |> Assumption.add_assumes casms
       ||> Variable.set_body true;