From f2729f73cbffde5ef332ce943bc07021302781ab Mon Sep 17 00:00:00 2001
From: Vidar Holen <vidar@vidarholen.net>
Date: Sun, 10 Dec 2023 17:57:33 -0800
Subject: [PATCH] Abuse STRIP to avoid crashes on unsupported AST nodes

---
 src/ShellCheck/CFG.hs | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/src/ShellCheck/CFG.hs b/src/ShellCheck/CFG.hs
index 2fe11e7..0cd6326 100644
--- a/src/ShellCheck/CFG.hs
+++ b/src/ShellCheck/CFG.hs
@@ -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