wrath/shaniqua-plugins
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Hi parser for ghc6.6

Browse Source
This commit is contained in:
Lemmih 2007-01-29 03:15:27 +00:00
parent 7856e250aa
commit 2b876f52e9
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/Language/Hi/Parser.hs
View File

@ -70,9 +70,9 @@ instance Binary Iface where
build_tag <- get bh :: IO String -- 'way' flag build_tag <- get bh :: IO String -- 'way' flag
#if __GLASGOW_HASKELL__ >= 604 #if __GLASGOW_HASKELL__ >= 604
pkg_name <- get bh :: IO FastString
mod_name <- get bh :: IO FastString mod_name <- get bh :: IO FastString
_is_boot <- get bh :: IO Bool _is_boot <- get bh :: IO Bool
let pkg_name = mkFastString "unknown" -- >=604 has no package field
#elif CABAL == 1 && __GLASGOW_HASKELL__ == 603 #elif CABAL == 1 && __GLASGOW_HASKELL__ == 603
mod_name <- get bh :: IO FastString mod_name <- get bh :: IO FastString
let pkg_name = mkFastString "unknown" let pkg_name = mkFastString "unknown"