diff options
| author | Ian Lynagh <igloo@earth.li> | 2010-07-30 20:21:46 +0000 |
|---|---|---|
| committer | Ian Lynagh <igloo@earth.li> | 2010-07-30 20:21:46 +0000 |
| commit | 9efbdbefffd477ab5261724b926f0096f0e578b6 (patch) | |
| tree | d444a5cd090045d394da275c35c78d48f310f62f /src/Haddock/InterfaceFile.hs | |
| parent | e998ed04e53f295715251be764457ff4eec4ae9f (diff) | |
Fix build in GHC tree
Diffstat (limited to 'src/Haddock/InterfaceFile.hs')
| -rw-r--r-- | src/Haddock/InterfaceFile.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Haddock/InterfaceFile.hs b/src/Haddock/InterfaceFile.hs index e97b8a3e..5fe47b72 100644 --- a/src/Haddock/InterfaceFile.hs +++ b/src/Haddock/InterfaceFile.hs @@ -103,7 +103,7 @@ writeInterfaceFile filename iface = do -- write the symtab pointer at the front of the file symtab_p <- tellBin bh putAt bh symtab_p_p symtab_p - seekBin bh symtab_p + seekBin bh symtab_p -- write the symbol table itself symtab_next' <- readFastMutInt symtab_next |