@@ -12,6 +12,7 @@
1212--
1313-----------------------------------------------------------------------------
1414
15+{-# LANGUAGE CPP #-}
1516{-# LANGUAGE DeriveDataTypeable #-}
1617{-# LANGUAGE ScopedTypeVariables #-}
1718{-# LANGUAGE RecordWildCards #-}
@@ -23,6 +24,10 @@ import qualified Data.Data as D
2324import Data.Aeson ((.=), (.:))
2425import qualified Data.Aeson as A
2526
27+#if __GLASGOW_HASKELL__ < 710
28+import Control.Applicative
29+#endif
30+
2631-- |
2732-- Source position information
2833--