diff options
| author | davve <davve@dtek.chalmers.se> | 2006-09-22 20:52:11 +0000 |
|---|---|---|
| committer | davve <davve@dtek.chalmers.se> | 2006-09-22 20:52:11 +0000 |
| commit | 1e9f7a39e38e8133844196be35ff8d4a243ffc60 (patch) | |
| tree | e5b32e55d12f18682c9c2899f9a624ebe082ad4c /src/Main.hs | |
| parent | 2174755f1ce1fd5cbf7b7d68035176835f1dce7f (diff) | |
Fix a comment in Main
Diffstat (limited to 'src/Main.hs')
| -rw-r--r-- | src/Main.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Main.hs b/src/Main.hs index a4b9810f..acf9893a 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -812,7 +812,7 @@ mkExportItems mod_map this_mod exported_names exportedDeclMap localDeclMap sub_m | OptHide `elem` hmod_options hmod -> return (hmod_export_items hmod) | otherwise -> return [ ExportModule m ] - Nothing -> return [] -- already emitted a warning in exportedNames + Nothing -> return [] -- already emitted a warning in visibleNames findDecl :: Name -> (Maybe (LHsDecl Name), Maybe (HsDoc Name)) findDecl n | not (isExternalName n) = error "This shouldn't happen" |