diff options
| author | qrczak <unknown> | 2001-05-01 09:16:56 +0000 |
|---|---|---|
| committer | qrczak <unknown> | 2001-05-01 09:16:56 +0000 |
| commit | df65fd0b7646ffa17ed553289a4cd0e806bef8b9 (patch) | |
| tree | c3389d6dff99858ed1de9486ca693623d4dda54b /ghc/compiler/rename/RnBinds.lhs | |
| parent | 4af93602d4ff7b847e55c377604d3e42f401a099 (diff) | |
| download | haskell-df65fd0b7646ffa17ed553289a4cd0e806bef8b9.tar.gz | |
[project @ 2001-05-01 09:16:55 by qrczak]
Inline instance dictionary functions.
Remove {-# INLINE instance #-} support and uses.
Diffstat (limited to 'ghc/compiler/rename/RnBinds.lhs')
| -rw-r--r-- | ghc/compiler/rename/RnBinds.lhs | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/ghc/compiler/rename/RnBinds.lhs b/ghc/compiler/rename/RnBinds.lhs index 7b2cf88e7c..137e916192 100644 --- a/ghc/compiler/rename/RnBinds.lhs +++ b/ghc/compiler/rename/RnBinds.lhs @@ -524,9 +524,6 @@ renameSig (SpecInstSig ty src_loc) rnHsType (text "A SPECIALISE instance pragma") ty `thenRn` \ new_ty -> returnRn (SpecInstSig new_ty src_loc) -renameSig (InlineInstSig p src_loc) - = returnRn (InlineInstSig p src_loc) - renameSig (SpecSig v ty src_loc) = pushSrcLocRn src_loc $ lookupSigOccRn v `thenRn` \ new_v -> |