From 188566719d28a140602a24ef823b28b81e45cb85 Mon Sep 17 00:00:00 2001 From: Josh Chen Date: Thu, 16 Apr 2020 15:37:43 +0200 Subject: update for Isabelle2020 --- spartan/lib/equality.ML | 2 +- spartan/lib/goals.ML | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) (limited to 'spartan/lib') diff --git a/spartan/lib/equality.ML b/spartan/lib/equality.ML index 79b4086..023147b 100644 --- a/spartan/lib/equality.ML +++ b/spartan/lib/equality.ML @@ -84,7 +84,7 @@ fun equality_context_tac fact ctxt = THEN ALLGOALS (side_conds_tac ctxt) ) in - fn (ctxt, st) => Method.CONTEXT (record_inserts ctxt) (tac st) + fn (ctxt, st) => Context_Tactic.TACTIC_CONTEXT (record_inserts ctxt) (tac st) end end diff --git a/spartan/lib/goals.ML b/spartan/lib/goals.ML index ce23751..9f394f0 100644 --- a/spartan/lib/goals.ML +++ b/spartan/lib/goals.ML @@ -31,7 +31,7 @@ fun prep_statement prep_att prep_stmt raw_elems raw_stmt ctxt = let val (stmt, elems_ctxt) = prep_stmt raw_elems raw_stmt ctxt val prems = Assumption.local_prems_of elems_ctxt ctxt - val stmt_ctxt = fold (fold (Variable.auto_fixes o fst) o snd) + val stmt_ctxt = fold (fold (Proof_Context.augment o fst) o snd) stmt elems_ctxt in case raw_stmt of -- cgit v1.2.3