Fixed some unused module import warnings, now that PassM is not build of monad transformers

Main.hs

@@ -19,10 +19,8 @@ with this program.  If not, see <http://www.gnu.org/licenses/>.
 -- | Driver for the compiler.
 module Main (main) where
 
-import Control.Monad.Error
 import Control.Monad.Identity
 import Control.Monad.State
-import Control.Monad.Writer
 import Data.Either
 import Data.Generics
 import Data.Maybe

backends/GenerateCBased.hs

@@ -19,10 +19,8 @@ with this program.  If not, see <http://www.gnu.org/licenses/>.
 -- | The function dictionary and various types and helper functions for backends based around C
 module GenerateCBased where
 
-import Control.Monad.Error
 import Control.Monad.Reader
 import Control.Monad.State
-import Control.Monad.Writer
 import Data.Generics
 import System.IO
 

backends/GenerateCTest.hs

@@ -31,10 +31,8 @@ with this program.  If not, see <http://www.gnu.org/licenses/>.
 -- do a similar trick.
 module GenerateCTest (tests) where
 
-import Control.Monad.Error
 import Control.Monad.State
 import Control.Monad.Reader
-import Control.Monad.Writer hiding (tell)
 import Data.Generics
 import Data.List (isInfixOf, intersperse)
 import Data.Maybe (fromMaybe)

common/TestHarness.hs

@@ -34,8 +34,6 @@ The file is terminated by a single percent on its own line.
 module TestHarness (automaticTest, automaticTimeTest) where
 
 import Control.Monad.Error
-import Control.Monad.State
-import Control.Monad.Writer
 import Data.List
 import Data.Maybe
 import System.IO

common/TestUtils.hs

@@ -38,9 +38,7 @@ If they are not equal, it shows them (using 'show') with the given message prefi
 
 module TestUtils where
 
-import Control.Monad.Error
 import Control.Monad.State
-import Control.Monad.Writer
 import Data.Generics
 import qualified Data.Map as Map
 import System.Time

frontends/ParseOccam.hs

@@ -21,7 +21,6 @@ module ParseOccam (parseOccamProgram) where
 
 import Control.Monad (liftM, when)
 import Control.Monad.State (MonadState, modify, get, put)
-import Control.Monad.Writer (tell)
 import Data.List
 import qualified Data.Map as Map
 import Data.Maybe

frontends/RainTypesTest.hs

@@ -20,8 +20,6 @@ with this program.  If not, see <http://www.gnu.org/licenses/>.
 module RainTypesTest where
 
 import Control.Monad.State
-import Control.Monad.Error
-import Control.Monad.Writer
 import Data.Generics
 import Test.HUnit hiding (State)
 

pass/Pass.hs

@@ -19,10 +19,7 @@ with this program.  If not, see <http://www.gnu.org/licenses/>.
 -- | Common definitions for passes over the AST.
 module Pass where
 
-import Control.Monad.Error
-import Control.Monad.Reader
 import Control.Monad.State
-import Control.Monad.Writer
 import Data.Generics
 import Data.List
 import qualified Data.Set as Set

pass/Properties.hs

@@ -58,7 +58,7 @@ module Properties
   )
   where
 
-import Control.Monad.Writer
+import Control.Monad
 import Data.Generics
 import Data.Int
 import Data.List