@@ -28,7 +28,6 @@ import qualified Data.Map as M
28import Control.Applicative
28import Control.Applicative
29import Control.Arrow (Arrow(..))
29import Control.Arrow (Arrow(..))
30import Control.Monad.State
30import Control.Monad.State
32import Control.Monad.Error.Class (MonadError(..))
31import Control.Monad.Error.Class (MonadError(..))
34import Language.PureScript.AST
33import Language.PureScript.AST