Doubled speed by applying all checks in one iteration.

This commit is contained in:
Vidar Holen 2013-07-02 20:29:07 -07:00
parent 6aafc86a67
commit 99be2736a1
1 changed files with 7 additions and 6 deletions

View File

@ -31,12 +31,13 @@ import Data.Maybe
data Shell = Ksh | Zsh | Sh | Bash data Shell = Ksh | Zsh | Sh | Bash
deriving (Show, Eq) deriving (Show, Eq)
genericChecks = concat [ genericChecks = [
map runBasicAnalysis basicChecks runBasicAnalysis (\x -> mapM_ (flip ($) x) basicChecks)
,[runBasicTreeAnalysis treeChecks] ,runBasicTreeAnalysis treeChecks
,[subshellAssignmentCheck] ,subshellAssignmentCheck
,[checkSpacefulness, checkQuotesInLiterals] ,checkSpacefulness
,[checkShebang] ,checkQuotesInLiterals
,checkShebang
] ]
checksFor Sh = map runBasicAnalysis [ checksFor Sh = map runBasicAnalysis [