Added the checkUnusedVar check to the standard pass list

This commit is contained in:
Neil Brown 2008-11-25 17:36:23 +00:00
parent 393bb75eb4
commit 7fdef8f75a

View File

@ -28,6 +28,7 @@ import qualified Data.Set as Set
import qualified AST as A import qualified AST as A
import BackendPasses import BackendPasses
import Check import Check
import CheckFramework
import CompState import CompState
import Errors import Errors
import GenerateC import GenerateC
@ -62,6 +63,8 @@ commonPasses opts = concat $
, simplifyProcs , simplifyProcs
, unnest , unnest
, squashArrays , squashArrays
, [pass "Removing unused variables" [] []
(passOnlyOnAST "checkUnusedVar" (runChecks checkUnusedVar))]
] ]
filterPasses :: CompState -> [Pass] -> [Pass] filterPasses :: CompState -> [Pass] -> [Pass]