projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
[project @ 1999-10-13 16:39:10 by simonmar]
[ghc-hetmet.git]
/
ghc
/
driver
/
ghc-asm.lprl
diff --git
a/ghc/driver/ghc-asm.lprl
b/ghc/driver/ghc-asm.lprl
index
5850074
..
a09a1db
100644
(file)
--- a/
ghc/driver/ghc-asm.lprl
+++ b/
ghc/driver/ghc-asm.lprl
@@
-478,6
+478,11
@@
sub mangle_asm {
$srtchk{$1} = $i;
+ } elsif ( /^$TUS[@]?([A-Za-z0-9_]+)_ct$TPOSTLBL[@]?$/o ) {
+ $chk[++$i] = $_;
+ $chkcat[$i] = 'data';
+ $chksymb[$i] = '';
+
} elsif ( /^$TUS[@]?ghc.*c_ID$TPOSTLBL/o ) {
$chk[++$i] = $_;
$chkcat[$i] = 'consist';