From: simonmar <unknown>
Date: Tue, 2 Jan 2001 12:20:52 +0000 (+0000)
Subject: [project @ 2001-01-02 12:20:52 by simonmar]
X-Git-Tag: Approximately_9120_patches~2995
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=a7be0ed3bfcc4a0c542cec795ed9f03be546d24e;p=ghc-hetmet.git

[project @ 2001-01-02 12:20:52 by simonmar]
Update the comment next to the (disabled) epilogue junk test to
reflect the real reason this test should be disabled.
---

diff --git a/ghc/driver/mangler/ghc-asm.lprl b/ghc/driver/mangler/ghc-asm.lprl
index e3b0ecb..fa43ae9 100644
--- a/ghc/driver/mangler/ghc-asm.lprl
+++ b/ghc/driver/mangler/ghc-asm.lprl
@@ -757,17 +757,11 @@ sub mangle_asm {
 		} else {
 		    print STDERR "$Pgm: unknown epilogue mangling? $TargetPlatform\n";
 		}
-		# HWL HACK: dont die, just print a warning
-		#print stderr "HWL: this should die! Epilogue junk?: $e\n" if $e =~ /^\t[^\.]/
-		#    && $TargetPlatform !~ /^powerpc-/; #ToDo: remove test
 
-		# ** FIXME:
-		# ** chak:
-		#   Commented this out, because it complains about junk that
-		#   is later removed in the FUNNY#END#THING loop - but as I am
-		#   not sure how this could ever have worked, there may be a 
-		#   better solution...
-		#die "Epilogue junk?: $e\n" if $e =~ /^\t[^\.\n]/
+		# --- Can't test for residual epilogue junk reliably because
+		# --- there might be some directives left over that we're going
+		# --- to move to the next chunk (see below).
+		# die "Epilogue junk?: $e\n" if $e =~ /^\t[^\.\n]/
 		#    && $TargetPlatform !~ /^powerpc-/; #ToDo: remove test
 
 		# glue together what's left