Use execState instead of snd . runState

2020-12-28 18:03:14 -05:00 · 2020-12-28 18:03:14 -05:00 · 81e84c2939
parent 34939ca0b7
commit 81e84c2939
1 changed files with 1 additions and 1 deletions
--- a/src/ShellCheck/AnalyzerLib.hs
+++ b/src/ShellCheck/AnalyzerLib.hs
@ -270,7 +270,7 @@ executableFromShebang = shellFor
 -- This is used to populate parentMap in Parameters
 getParentTree :: Token -> Map.Map Id Token
 getParentTree t =
-    snd . snd $ runState (doStackAnalysis pre post t) ([], Map.empty)
+    snd $ execState (doStackAnalysis pre post t) ([], Map.empty)
  where
    pre t = modify (first ((:) t))
    post t = do