[more sensible show instance for Module
John Meacham <john@repetae.net>**20050930033944] hunk ./FrontEnd/HsSyn.hs 60
-  deriving(Data,Typeable,Eq,Ord,Show,ToAtom,FromAtom)
+  deriving(Data,Typeable,Eq,Ord,ToAtom,FromAtom)
+
+instance Show Module where
+    showsPrec _ (Module n) = showString n