--- vector-0.7.1/Data/Vector/Fusion/Stream/Monadic.hs~ 2011-06-19 07:36:13.000000000 +0900 +++ vector-0.7.1/Data/Vector/Fusion/Stream/Monadic.hs 2013-01-04 18:17:36.363411378 +0900 @@ -94,15 +94,19 @@ import Data.Word ( Word8, Word16, Word32, Word, Word64 ) #if __GLASGOW_HASKELL__ >= 700 +#if 0 import GHC.Exts ( SpecConstrAnnotation(..) ) #endif +#endif #include "vector.h" data SPEC = SPEC | SPEC2 #if __GLASGOW_HASKELL__ >= 700 +#if 0 {-# ANN type SPEC ForceSpecConstr #-} #endif +#endif -- | Result of taking a single step in a stream