force editor mode if template present

2023-10-13 15:51:00 +02:00
parent 04038a32c8
commit 047c5ae268
4 changed files with 49 additions and 9 deletions
@@ -96,6 +96,7 @@ partial def findForbiddenTactics (inputCtx : Parser.InputContext)
      for n in ns do
        let some (.thmInfo ..) := (← getEnv).find? n
          | return () -- not a theroem -> ignore
+        -- TODO: Filter thhe theorem we want to proof to avoid structural recursion!
        let lemmasAndDefs := levelParams.lemmas ++ levelParams.definitions
        match lemmasAndDefs.find? (fun l => l.name == n) with
        | none => addWarningMessage info s!"You have not unlocked the lemma/definition '{n}' yet!"