allow "rcases with" tactic

2023-02-09 13:25:52 +01:00
parent e264f11d60
commit c93f6bfc15
2 changed files with 3 additions and 2 deletions
@@ -76,7 +76,8 @@ partial def findForbiddenTactics (inputCtx : Parser.InputContext) (level : GameL
      findForbiddenTactics inputCtx level arg
  | .atom info val =>
    -- ignore syntax elements that do not start with a letter
-    if 0 < val.length ∧ val.data[0]!.isAlpha then
+    -- and ignore "with" keyword
+    if 0 < val.length ∧ val.data[0]!.isAlpha ∧ val != "with" then
      if ¬ ((level.tactics.map (·.name.toString))).contains val then
        addErrorMessage info s!"You have not unlocked the tactic '{val}' yet!"
      else if level.disabledTactics.contains val