From 490fd9654aed77300aa4d595bdd89d2805aebdd1 Mon Sep 17 00:00:00 2001 From: igloo Date: Fri, 16 Apr 2004 02:02:44 +0000 Subject: [PATCH] [project @ 2004-04-16 02:02:44 by igloo] Change the mangler to allow a tab before .section on sparc. Fixes a problem which shows up as symbols not being made global so not being defined when compiling with gcc >= 3.something. --- ghc/driver/mangler/ghc-asm.lprl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/ghc/driver/mangler/ghc-asm.lprl b/ghc/driver/mangler/ghc-asm.lprl index 3c386e2..62896b9 100644 --- a/ghc/driver/mangler/ghc-asm.lprl +++ b/ghc/driver/mangler/ghc-asm.lprl @@ -422,7 +422,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|\.seg|\.stab.*|\.section.*|\s+\.type.*|\s+\.size.*)\n)'; + $T_MOVE_DIRVS = '^((\s+\.align\s+\d+|\s+\.proc\s+\d+|\s+\.global\s+\S+|\.text|\.data|\.seg|\.stab.*|\t?\.section.*|\s+\.type.*|\s+\.size.*)\n)'; $T_COPY_DIRVS = '\.(global|globl|proc|stab)'; $T_hsc_cc_PAT = '\.asciz.*\)(hsc|cc) (.*)\\\\t(.*)"'; -- 1.7.10.4