From 820d32a2bf999b3391a2c1c13363db5cc3bac307 Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Tue, 16 May 2000 09:08:03 +0000
Subject: [PATCH] [project @ 2000-05-16 09:08:03 by simonmar] oops... better
unbreak the driver
---
ghc/driver/ghc.lprl | 16 +++++++++-------
1 file changed, 9 insertions(+), 7 deletions(-)
diff --git a/ghc/driver/ghc.lprl b/ghc/driver/ghc.lprl
index 6bd471bbc0d3..7ec0015a0949 100644
--- a/ghc/driver/ghc.lprl
+++ b/ghc/driver/ghc.lprl
@@ -1502,13 +1502,15 @@ Now the Haskell compiler, C compiler, and assembler
&run_something("cp $hsc_out_h_stub $ofile_h_stub_target", 'Copy foreign export header file');
}
- #
- # Bring the C stub protos into scope when compiling the .hc file.
- #
- push (@CcInjects, "#include \"${hsc_out_h_stub}\"\n");
- # Hack - ensure that the stub .h file is included in the OPTIONS section
- # if the .hc file is saved.
- push (@File_options, "-#include \"${ofile_h_stub_target}\"\n");
+ if (-f $hsc_out_c_stub) {
+ #
+ # Bring the C stub protos into scope when compiling the .hc file.
+ #
+ push (@CcInjects, "#include \"${hsc_out_h_stub}\"\n");
+ # Hack - ensure that the stub .h file is included in the OPTIONS section
+ # if the .hc file is saved.
+ push (@File_options, "-#include \"${ofile_h_stub_target}\"\n");
+ }
if ($do_cc) {
&runGcc ($is_hc_file, $hsc_out, $cc_as_o);
--
GitLab