diff options
| author | Simon Marlow <marlowsd@gmail.com> | 2010-06-02 09:03:04 +0000 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2010-06-02 09:03:04 +0000 |
| commit | 95ef20b14e20d7ef57eae58d93dd16121b0c7e1e (patch) | |
| tree | 0a161dc9279b77713a4977d4a0ac6a7672ab3e00 /src/Haddock/Backends | |
| parent | 963c36f8c227fddd5cc65e7212b7727f6f115432 (diff) | |
Fix compilation with GHC 6.13
Diffstat (limited to 'src/Haddock/Backends')
| -rw-r--r-- | src/Haddock/Backends/Xhtml/Decl.hs | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/Haddock/Backends/Xhtml/Decl.hs b/src/Haddock/Backends/Xhtml/Decl.hs index 919466b5..0ea35a87 100644 --- a/src/Haddock/Backends/Xhtml/Decl.hs +++ b/src/Haddock/Backends/Xhtml/Decl.hs @@ -744,8 +744,7 @@ ppForAll Explicit ltvs lctxt = ppBang :: HsBang -> Html ppBang HsNoBang = empty -ppBang HsStrict = toHtml "!" -ppBang HsUnbox = toHtml "!" -- unboxed args is an implementation detail, +ppBang _ = toHtml "!" -- Unpacked args is an implementation detail, -- so we just show the strictness annotation |