X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2Fvectorise%2FVectType.hs;h=cfcea389bba715344bcbeecdf886ba632981e292;hp=86dcaf236b3e5b93449e2f51947aaadae2e3cdb2;hb=30c122df62ec75f9ed7f392f24c2925675bf1d06;hpb=7c7104a51d477c18f8950112c4bc22c4800367f3 diff --git a/compiler/vectorise/VectType.hs b/compiler/vectorise/VectType.hs index 86dcaf2..cfcea38 100644 --- a/compiler/vectorise/VectType.hs +++ b/compiler/vectorise/VectType.hs @@ -45,6 +45,7 @@ import Util ( singleton ) import Digraph ( SCC(..), stronglyConnComp ) import Outputable +import FastString import Control.Monad ( liftM, liftM2, zipWithM, zipWithM_, mapAndUnzipM ) import Data.List ( inits, tails, zipWith4, zipWith5 )