aboutsummaryrefslogtreecommitdiff
path: root/spartan
diff options
context:
space:
mode:
Diffstat (limited to 'spartan')
-rw-r--r--spartan/lib/equality.ML2
-rw-r--r--spartan/lib/goals.ML2
2 files changed, 2 insertions, 2 deletions
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