diff --git a/test/SpecHelper.hs b/test/SpecHelper.hs
index 004536a..60d4b75 100644
--- a/test/SpecHelper.hs
+++ b/test/SpecHelper.hs
@@ -1,3 +1,4 @@
+{-# LANGUAGE CPP #-}
 {-# LANGUAGE OverloadedStrings #-}
 module SpecHelper
   ( locally
@@ -22,6 +23,9 @@ module SpecHelper
   , oddish
   ) where
 
+#if __GLASGOW_HASKELL__ < 710
+import Control.Applicative ((<$))
+#endif
 import Control.Monad (forever)
 import Control.Concurrent (forkIO)
 import Control.Exception (bracket)