diff options
| author | simonpj <unknown> | 2005-08-11 13:10:34 +0000 |
|---|---|---|
| committer | simonpj <unknown> | 2005-08-11 13:10:34 +0000 |
| commit | 44a4eadd61f809dfb2fbcb753be0c0915e923863 (patch) | |
| tree | 66163cdcb619d6eb277156c10d4c93a2c9367dcf /ghc/compiler/rename/RnBinds.lhs | |
| parent | 81d9bd68cd5bc763ef7d675d5263f210e7dca9c0 (diff) | |
| download | haskell-44a4eadd61f809dfb2fbcb753be0c0915e923863.tar.gz | |
[project @ 2005-08-11 13:10:34 by simonpj]
Ack! missed one!
Diffstat (limited to 'ghc/compiler/rename/RnBinds.lhs')
| -rw-r--r-- | ghc/compiler/rename/RnBinds.lhs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ghc/compiler/rename/RnBinds.lhs b/ghc/compiler/rename/RnBinds.lhs index 3c8b4d863b..c3c32be313 100644 --- a/ghc/compiler/rename/RnBinds.lhs +++ b/ghc/compiler/rename/RnBinds.lhs @@ -174,7 +174,7 @@ rnTopBindsBoot :: HsValBinds RdrName -> RnM (HsValBinds Name, DefUses) rnTopBindsBoot (ValBindsIn mbinds sigs) = do { checkErr (isEmptyLHsBinds mbinds) (bindsInHsBootFile mbinds) ; sigs' <- renameSigs okHsBootSig sigs - ; return (ValBindsIn emptyLHsBinds sigs', usesOnly (hsSigsFVs sigs')) } + ; return (ValBindsOut emptyLHsBinds sigs', usesOnly (hsSigsFVs sigs')) } rnTopBindsSrc :: HsValBinds RdrName -> RnM (HsValBinds Name, DefUses) rnTopBindsSrc binds@(ValBindsIn mbinds _) |