Abuse STRIP to avoid crashes on unsupported AST nodes

This commit is contained in:
Vidar Holen 2023-12-10 17:57:33 -08:00
parent 175d3cc9b7
commit f2729f73cb
1 changed files with 3 additions and 1 deletions

View File

@ -887,7 +887,9 @@ build t = do
T_Less _ -> none
T_ParamSubSpecialChar _ _ -> none
x -> error ("Unimplemented: " ++ show x)
x -> do
error ("Unimplemented: " ++ show x) -- STRIP
none
-- Still in `where` clause
forInHelper id name words body = do