From 77916d264566f748c16cde68423d69420cd4307c Mon Sep 17 00:00:00 2001 From: Vidar Holen Date: Sun, 2 Feb 2014 21:47:02 -0800 Subject: [PATCH] Fixed compilation error on GHC7 --- ShellCheck/Analytics.hs | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/ShellCheck/Analytics.hs b/ShellCheck/Analytics.hs index 9619337..9a6d483 100644 --- a/ShellCheck/Analytics.hs +++ b/ShellCheck/Analytics.hs @@ -21,7 +21,7 @@ import ShellCheck.AST import ShellCheck.Data import ShellCheck.Parser import Control.Monad -import Control.Monad.State.Strict +import Control.Monad.State import Control.Monad.Writer import qualified Data.Map as Map import Data.Char @@ -992,8 +992,6 @@ checkOrNeq _ (TA_Binary id "||" (TA_Binary _ "!=" word1 _) (TA_Binary _ "!=" wor checkOrNeq _ _ = return () -allModifiedVariables t = snd $ runWriter (doAnalysis (\x -> modify $ (++) (getModifiedVariables x)) t) - prop_checkValidCondOps1 = verify checkValidCondOps "[[ a -xz b ]]" prop_checkValidCondOps2 = verify checkValidCondOps "[ -M a ]" prop_checkValidCondOps2a= verifyNot checkValidCondOps "[ 3 \\> 2 ]"