@@ -1,8 +1,11 @@
1−{-# LANGUAGE BangPatterns, OverloadedStrings #-}
1+{-# LANGUAGE BangPatterns, CPP, OverloadedStrings #-}
22{-# OPTIONS_GHC -fno-warn-warnings-deprecations #-}
33module QC.Text (tests) where
44
5−import Control.Applicative ((<$>), (<*>))
5+#if !MIN_VERSION_base(4,8,0)
6+import Control.Applicative ((<*>))
7+#endif
8+import Control.Applicative ((<$>))
69import Data.Int (Int64)
710import Prelude hiding (take, takeWhile)
811import QC.Common (liftOp, parseT)