From 7644077d1e6ac89d392d1f63bb42adac67b0fc76 Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Wed, 1 Sep 1999 14:17:14 +0000
Subject: [PATCH] [project @ 1999-09-01 14:17:14 by sof] If -noC is used, don't
compile the foreign-export C stubs
---
ghc/driver/ghc.lprl | 6 ++++--
1 file changed, 4 insertions(+), 2 deletions(-)
diff --git a/ghc/driver/ghc.lprl b/ghc/driver/ghc.lprl
index 1db52ea9e812..a2ca7b719deb 100644
--- a/ghc/driver/ghc.lprl
+++ b/ghc/driver/ghc.lprl
@@ -1471,8 +1471,10 @@ Now the Haskell compiler, C compiler, and assembler
local ($hsc_out_o_stub);
($ofile_s_stub_target = $ofile_c_stub_target) =~ s/\.(.*)$/\.s/;
($ofile_o_stub_target = $ofile_c_stub_target) =~ s/\.(.*)$/\.o/;
- &runGcc (0, $ofile_c_stub_target, $ofile_s_stub_target);
- &runAs ($ofile_o_stub_target, $ofile_s_stub_target);
+ if ($do_cc) {
+ &runGcc (0, $ofile_c_stub_target, $ofile_s_stub_target);
+ &runAs ($ofile_o_stub_target, $ofile_s_stub_target);
+ }
#
# Bring the C stub protos into scope when compiling the .hc file.
#
--
GitLab