diff options
| author | davve <davve@dtek.chalmers.se> | 2006-12-28 13:22:24 +0000 |
|---|---|---|
| committer | davve <davve@dtek.chalmers.se> | 2006-12-28 13:22:24 +0000 |
| commit | 480f09d1ce43853eb3849edd7503ecee60fe036e (patch) | |
| tree | b6f3727391c9de73a0c123bb75dea659dfe7f335 /src/HaddockUtil.hs | |
| parent | 313f9e69c9981a0200e333b3dc573dc9e681c0ad (diff) | |
Update to build with latest GHC HEAD
Diffstat (limited to 'src/HaddockUtil.hs')
| -rw-r--r-- | src/HaddockUtil.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/HaddockUtil.hs b/src/HaddockUtil.hs index 7fe6f796..7cdca748 100644 --- a/src/HaddockUtil.hs +++ b/src/HaddockUtil.hs @@ -320,7 +320,7 @@ instance Binary FormatVersion where ++ " is not allowed") get bh = do - w8 :: Word8 <- get bh + (w8 :: Word8) <- get bh if testBit w8 7 then do |