Renamed squashArrays to backendPasses, since that's what it has become

This commit is contained in:
Neil Brown 2009-03-22 18:27:10 +00:00
parent 4f6050069c
commit 20f2fb2c14
2 changed files with 4 additions and 4 deletions

View File

@ -17,7 +17,7 @@ with this program. If not, see <http://www.gnu.org/licenses/>.
-} -}
-- | Passes associated with the backends -- | Passes associated with the backends
module BackendPasses (addSizesActualParameters, addSizesFormalParameters, declareSizesArray, simplifySlices, squashArrays, transformWaitFor) where module BackendPasses (addSizesActualParameters, addSizesFormalParameters, declareSizesArray, simplifySlices, backendPasses, transformWaitFor) where
import Control.Monad.State import Control.Monad.State
import Data.Generics import Data.Generics
@ -36,8 +36,8 @@ import Traversal
import Types import Types
import Utils import Utils
squashArrays :: [Pass] backendPasses :: [Pass]
squashArrays = backendPasses =
-- Note that removeDirections is only for C, whereas removeUnneededDirections -- Note that removeDirections is only for C, whereas removeUnneededDirections
-- is for all backends -- is for all backends
[ removeDirectionsForC [ removeDirectionsForC

View File

@ -67,7 +67,7 @@ commonPasses opts = concat $
, unnest , unnest
, enablePassesWhen csUsageChecking , enablePassesWhen csUsageChecking
[abbrevCheckPass] [abbrevCheckPass]
, squashArrays , backendPasses
, [pass "Removing unused variables" [] [] , [pass "Removing unused variables" [] []
(passOnlyOnAST "checkUnusedVar" (runChecks checkUnusedVar))] (passOnlyOnAST "checkUnusedVar" (runChecks checkUnusedVar))]
] ]