From b2d7555f41f6a86049326e82f669c2bd548bfcee Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Tue, 18 Jan 2000 11:51:08 +0000
Subject: [PATCH] [project @ 2000-01-18 11:51:08 by simonmar] Don't attempt to
split objects built from _stub files.
Patch from Michael Weber <michael.weber@post.rwth-aachen.de>.
---
ghc/driver/ghc.lprl | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/ghc/driver/ghc.lprl b/ghc/driver/ghc.lprl
index bb80a14c59cc..0da8e02effe1 100644
--- a/ghc/driver/ghc.lprl
+++ b/ghc/driver/ghc.lprl
@@ -2171,7 +2171,7 @@ sub runAs {
# need to add the -I flags in case the file is going through cpp (.S files)
local($includes) = '-I' . join(' -I', @Include_dir);
- if ( ! $SplitObjFiles ) {
+ if ( ! $SplitObjFiles || $ifile_root =~ /_stub\.s$/ ) {
local($to_do) = "$asmblr -o $as_out -c @As_flags $includes $cc_as";
push(@Files_to_tidy, $as_out );
&run_something($to_do, 'Unix assembler');
--
GitLab