[check to see if all exported names are valid
John Meacham <john@repetae.net>**20090821020604
 Ignore-this: 260f5f0ed95a081d1f30e3abf9d3d72d
] hunk ./bugs/issue-b70596adb81a547938db2768034855bc0e0c7357.yaml 10
-status: :unstarted
-disposition: 
+status: :closed
+disposition: :fixed
hunk ./bugs/issue-b70596adb81a547938db2768034855bc0e0c7357.yaml 21
+- - 2009-08-21 02:05:56.920981 Z
+  - John Meacham <john@repetae.net>
+  - closed with disposition fixed
+  - ""
hunk ./src/FrontEnd/Rename.hs 165
+        withSrcLoc (hsModuleSrcLoc tidy) $ do
hunk ./src/FrontEnd/Rename.hs 171
+        mapM_ checkExportSpec $ fromMaybe [] (hsModuleExports tidy)
hunk ./src/FrontEnd/Rename.hs 174
+checkExportSpec :: HsExportSpec -> RM ()
+checkExportSpec e = f e  where
+    f :: HsExportSpec -> RM ()
+    f (HsEVar n) = do rename n; return ()
+    f (HsEAbs n) = do renameTypeName n; return ()
+    f (HsEThingAll n) = do renameTypeName n ; return ()
+    f (HsEThingWith n ns) = do
+        renameTypeName n
+        mapM_ rename ns
+    f HsEModuleContents {} = return ()
+
+
hunk ./src/FrontEnd/Rename.hs 676
+renameTypeName :: HsName -> RM HsName
hunk ./src/FrontEnd/Rename.hs 758
-