@@ -12,6 +12,7 @@
13-----------------------------------------------------------------------------
13-----------------------------------------------------------------------------
15{-# LANGUAGE DeriveDataTypeable #-}
16{-# LANGUAGE DeriveDataTypeable #-}
16{-# LANGUAGE ScopedTypeVariables #-}
17{-# LANGUAGE ScopedTypeVariables #-}
17{-# LANGUAGE RecordWildCards #-}
18{-# LANGUAGE RecordWildCards #-}
@@ -23,6 +24,10 @@ import qualified Data.Data as D
23import Data.Aeson ((.=), (.:))
24import Data.Aeson ((.=), (.:))
24import qualified Data.Aeson as A
25import qualified Data.Aeson as A
27+#if __GLASGOW_HASKELL__ < 710
28+import Control.Applicative
27-- Source position information
32-- Source position information