Check number of arguments in pattern match

This commit is contained in:
Martin Fredin 2023-04-24 10:10:15 +02:00
parent 25075ccaac
commit 804d0da167
2 changed files with 4 additions and 3 deletions

View file

@ -66,5 +66,3 @@ rpProgram rf (Program defs) = do
ECase e bs -> rpuExp e >> mapM_ rpuBranch bs
_ -> pure ()
reportAnyForall :: Program -> Err ()
reportAnyForall = undefined