Mercurial Mercurial > repos > isabelle / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
src/HOL/Tools/reification.ML
changeset 74408 4cdc5e946c99
parent 74282 c2ee8d993d6a
child 74525 c960bfcb91db 
--- a/src/HOL/Tools/reification.ML	Sat Oct 02 11:56:11 2021 +0200
+++ b/src/HOL/Tools/reification.ML	Sat Oct 02 12:04:14 2021 +0200
@@ -139,7 +139,7 @@
         Abs (_, xT, ta) =>
           let
             val ([raw_xn], ctxt') = Variable.variant_fixes ["x"] ctxt;
-            val (xn, ta) = Syntax_Trans.variant_abs (raw_xn, xT, ta);  (* FIXME !? *)
+            val (xn, ta) = Term.dest_abs (raw_xn, xT, ta);
             val x = Free (xn, xT);
             val cx = Thm.cterm_of ctxt' x;
             val cta = Thm.cterm_of ctxt' ta;
isabelle