diff options
| author | simonmar <unknown> | 2000-05-10 08:27:12 +0000 |
|---|---|---|
| committer | simonmar <unknown> | 2000-05-10 08:27:12 +0000 |
| commit | cd6a73a7be93ffdaaefbd4b47b78425dcec4fc02 (patch) | |
| tree | 1b4aea6c6f72721fc9569ecf53ca46be3963c7c4 | |
| parent | 651aa871b2fa8935721d9b0f54c4502dc33ff808 (diff) | |
| download | haskell-cd6a73a7be93ffdaaefbd4b47b78425dcec4fc02.tar.gz | |
[project @ 2000-05-10 08:27:12 by simonmar]
Hack to work around bug in pre-4.06 mkdependHS. Fixes last night's
nightly build failure.
| -rw-r--r-- | ghc/compiler/rename/RnIfaces.lhs | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/ghc/compiler/rename/RnIfaces.lhs b/ghc/compiler/rename/RnIfaces.lhs index 9174defa18..0b6c36894a 100644 --- a/ghc/compiler/rename/RnIfaces.lhs +++ b/ghc/compiler/rename/RnIfaces.lhs @@ -1059,8 +1059,11 @@ readIface wanted_mod file_path \begin{code} noIfaceErr mod_name boot_file search_path = vcat [ptext SLIT("Could not find interface file for") <+> quotes (pprModuleName mod_name), - ptext SLIT("in the directories") <+> vcat [ text dir <> text "/*" <> pp_suffix suffix - | (dir,suffix) <- search_path] + ptext SLIT("in the directories") <+> + -- \& to avoid cpp interpreting this string as a + -- comment starter with a pre-4.06 mkdependHS --SDM + vcat [ text dir <> text "/\&*" <> pp_suffix suffix + | (dir,suffix) <- search_path] ] where pp_suffix suffix | boot_file = ptext SLIT(".hi-boot") |