diff options
author | Josh Chen | 2020-08-09 18:34:58 +0200 |
---|---|---|
committer | Josh Chen | 2020-08-09 18:34:58 +0200 |
commit | 8f4ff41d24dd8fa6844312456d47cad4be6cb239 (patch) | |
tree | 05cb7780daead07c4714daa7e1fc19c940283b02 /spartan/core/tactics.ML | |
parent | c530305cbcafba9f66f1a55a1b5177a62f52535c (diff) |
(FEAT) Clean up typechecking/elaboration tactic: known_ctac should *solve* goals; resolving with conditional typing judgments (e.g. type family assumptions) is part of check_infer_step
Diffstat (limited to 'spartan/core/tactics.ML')
-rw-r--r-- | spartan/core/tactics.ML | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/spartan/core/tactics.ML b/spartan/core/tactics.ML index 446af15..45fd119 100644 --- a/spartan/core/tactics.ML +++ b/spartan/core/tactics.ML @@ -82,8 +82,8 @@ fun internalize_fact_tac t = Drule.infer_instantiate' ctxt [NONE, NONE, SOME B, SOME a] @{thm PiE} in HEADGOAL (resolve_tac ctxt [resolvent]) - (*known_tac infers the correct type T inferred by unification*) - THEN SOMEGOAL (NO_CONTEXT_TACTIC ctxt o Types.known_ctac []) + (*Infer the correct type T*) + THEN SOMEGOAL (NO_CONTEXT_TACTIC ctxt o Types.check_infer []) end) fun elim_core_tac tms types ctxt = |