diff options
| -rw-r--r-- | src/Main.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Main.hs b/src/Main.hs index f166e99c..dad47fb5 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -482,7 +482,7 @@ pass1 modules flags = worker modules (Map.empty) flags worker ((mod, checked_mod, filename):rest_modules) moduleMap flags = do let (parsed_source, renamed_source, _, moduleInfo) = checked_mod - (mb_doc_opts, _, _) = get_module_stuff parsed_source + (mb_doc_opts, _, _) = getModuleStuff parsed_source opts <- mkDocOpts mb_doc_opts @@ -551,7 +551,7 @@ pass1 modules flags = worker modules (Map.empty) flags worker rest_modules moduleMap' flags where - get_module_stuff source = + getModuleStuff source = let HsModule _ _ _ _ _ mb_opts info mb_doc = unLoc source in (mb_opts, info, mb_doc) |