@@ -127,11 +127,10 @@ getParsedModule file = use GetParsedModule file
127127
128128-- | Write interface files and hie files to the location specified by the given options.
129129writeIfacesAndHie ::
130− NormalizedFilePath -> NormalizedFilePath -> Action (Maybe [NormalizedFilePath])
131−writeIfacesAndHie ifDir main =
130+ NormalizedFilePath -> [NormalizedFilePath] -> Action (Maybe [NormalizedFilePath])
131+writeIfacesAndHie ifDir files =
132132 runMaybeT $ do
133− files <- transitiveModuleDeps <$> useE GetDependencies main
134− tcms <- usesE TypeCheck (main : files)
133+ tcms <- usesE TypeCheck files
135134 session <- lift $ useNoFile_ GhcSession
136135 liftIO $ concat <$> mapM (writeTcm session) tcms
137136 where