[clean up some warnings
John Meacham <john@repetae.net>**20070525002553] hunk ./E/Rules.hs 22
-import Data.Monoid
-import Data.Typeable
+import Control.Monad.Writer
hunk ./E/Rules.hs 25
-import Monad(liftM)
-import Control.Monad.Trans
hunk ./E/Rules.hs 26
-import Control.Monad.Writer
hunk ./E/Rules.hs 27
-import Atom(toAtom,fromAtom,Atom)
+import Atom(toAtom)
hunk ./E/Rules.hs 32
-import E.E
hunk ./E/Rules.hs 33
-import E.Eval
-import E.Show
+import E.E
+import E.Show()
hunk ./E/Rules.hs 36
-import E.TypeCheck hiding(match)
hunk ./E/Rules.hs 50
-import qualified Info.Info as Info
hunk ./E/Rules.hs 56
-    showsPrec _ r = showString (fromAtom $ ruleName r)
+    showsPrec _ r = shows $ ruleName r
hunk ./Ho/Library.hs 8
-import Control.Monad(when,foldM)