diff options
| author | simonmar <unknown> | 2005-03-03 10:37:57 +0000 |
|---|---|---|
| committer | simonmar <unknown> | 2005-03-03 10:37:57 +0000 |
| commit | fc9bacdece12574a9ba9d2de2a74783da19f2ac4 (patch) | |
| tree | b56615b3be5e42beb12bd48a08ed9859b5279635 /ghc/driver | |
| parent | c7f45440016ec1502209f13006682de89021eb3b (diff) | |
| download | haskell-fc9bacdece12574a9ba9d2de2a74783da19f2ac4.tar.gz | |
[project @ 2005-03-03 10:37:57 by simonmar]
Sparc: allow whitespace before .section directive. Should fix
linking problems on sparc/solaris.
Diffstat (limited to 'ghc/driver')
| -rw-r--r-- | ghc/driver/mangler/ghc-asm.lprl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ghc/driver/mangler/ghc-asm.lprl b/ghc/driver/mangler/ghc-asm.lprl index 6e29279178..3934416623 100644 --- a/ghc/driver/mangler/ghc-asm.lprl +++ b/ghc/driver/mangler/ghc-asm.lprl @@ -360,7 +360,7 @@ sub init_TARGET_STUFF { $T_CONST_LBL = '^\.LLC(\d+):$'; # regexp for what such a lbl looks like $T_POST_LBL = ':'; - $T_MOVE_DIRVS = '^((\s+\.align\s+\d+|\s+\.proc\s+\d+|\s+\.global\s+\S+|\.text|\.data|\.stab.*|\.section.*|\s+\.type.*|\s+\.size.*)\n)'; + $T_MOVE_DIRVS = '^((\s+\.align\s+\d+|\s+\.proc\s+\d+|\s+\.global\s+\S+|\.text|\.data|\.stab.*|\s*\.section.*|\s+\.type.*|\s+\.size.*)\n)'; $T_COPY_DIRVS = '\.(global|proc|stab)'; $T_DOT_WORD = '\.(long|word|byte|half|skip|uahalf|uaword)'; |