summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSimon Marlow <simonmar@microsoft.com>2006-02-27 15:28:22 +0000
committerSimon Marlow <simonmar@microsoft.com>2006-02-27 15:28:22 +0000
commitddb2e508c45dabf52d61cb019b0aead66e5ffaf7 (patch)
tree75c4de07f3263814ad16156bf40f96e30a3bdd3d
parent198fb1d8e6177d9304affe9bfb93cce62a1341a5 (diff)
downloadhaskell-ddb2e508c45dabf52d61cb019b0aead66e5ffaf7.tar.gz
x86_64: include .type and .size directives in the output, for valgrind
-rw-r--r--ghc/driver/mangler/ghc-asm.lprl2
1 files changed, 1 insertions, 1 deletions
diff --git a/ghc/driver/mangler/ghc-asm.lprl b/ghc/driver/mangler/ghc-asm.lprl
index 19c3012c08..d4f06e0aab 100644
--- a/ghc/driver/mangler/ghc-asm.lprl
+++ b/ghc/driver/mangler/ghc-asm.lprl
@@ -219,7 +219,7 @@ sub init_TARGET_STUFF {
$T_POST_LBL = ':';
$T_MOVE_DIRVS = '^(\s*\.(globl|text|data|section|align|size|type|ident|local)\s+.*\n)';
- $T_COPY_DIRVS = '\.(globl|local)';
+ $T_COPY_DIRVS = '\.(globl|type|size|local)';
$T_DOT_WORD = '\.(quad|long|value|byte|zero)';
$T_DOT_GLOBAL = '\.global';