diff options
| author | Simon Marlow <marlowsd@gmail.com> | 2009-08-24 16:00:20 +0000 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2009-08-24 16:00:20 +0000 |
| commit | f871cf1bf889704a4ec1f0063ad4d96f31453ea3 (patch) | |
| tree | 5ef05bebe64fca03c2e19a2b173b138266129858 /compiler/main/CodeOutput.lhs | |
| parent | 7dda6727312f52df2980639bdf4a1a653e74ca8f (diff) | |
| download | haskell-f871cf1bf889704a4ec1f0063ad4d96f31453ea3.tar.gz | |
Follow changes in Cabal: package -> sourcePackageId
Diffstat (limited to 'compiler/main/CodeOutput.lhs')
| -rw-r--r-- | compiler/main/CodeOutput.lhs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/main/CodeOutput.lhs b/compiler/main/CodeOutput.lhs index d362fb4984..2d68b830ec 100644 --- a/compiler/main/CodeOutput.lhs +++ b/compiler/main/CodeOutput.lhs @@ -127,7 +127,7 @@ outputC dflags filenm flat_absC packages _ -> "#include \""++h_file++"\"" pkg_configs <- getPreloadPackagesAnd dflags packages - let pkg_names = map (display.package) pkg_configs + let pkg_names = map (display.sourcePackageId) pkg_configs doOutput filenm $ \ h -> do hPutStr h ("/* GHC_PACKAGES " ++ unwords pkg_names ++ "\n*/\n") |