[commit: ghc] master: rts: Don't keep findPtr symbol alive if not -DDEBUG (e4c41ec)
git at git.haskell.org
git at git.haskell.org
Thu Jun 14 16:03:14 UTC 2018
Repository : ssh://git@git.haskell.org/ghc
On branch : master
Link : http://ghc.haskell.org/trac/ghc/changeset/e4c41ec2b1f2f222c9c8a83ef64d4e566aa47a44/ghc
>---------------------------------------------------------------
commit e4c41ec2b1f2f222c9c8a83ef64d4e566aa47a44
Author: Ben Gamari <bgamari.foss at gmail.com>
Date: Thu Jun 14 11:37:05 2018 -0400
rts: Don't keep findPtr symbol alive if not -DDEBUG
Test Plan: Test with Hadrian
Reviewers: simonmar, snowleopard, erikd
Subscribers: rwbarton, thomie, carter
Differential Revision: https://phabricator.haskell.org/D4846
>---------------------------------------------------------------
e4c41ec2b1f2f222c9c8a83ef64d4e566aa47a44
rts/rts.cabal.in | 4 ++++
1 file changed, 4 insertions(+)
diff --git a/rts/rts.cabal.in b/rts/rts.cabal.in
index d41135d..ffa6282 100644
--- a/rts/rts.cabal.in
+++ b/rts/rts.cabal.in
@@ -251,9 +251,11 @@ library
"-Wl,-u,_hs_atomicwrite8"
"-Wl,-u,_hs_atomicwrite16"
"-Wl,-u,_hs_atomicwrite32"
+#if defined(DEBUG)
-- This symbol is useful in gdb, but not referred to anywhere,
-- so we need to force it to be included in the binary.
"-Wl,-u,_findPtr"
+#endif
else
ld-options:
"-Wl,-u,base_GHCziTopHandler_runIO_closure"
@@ -324,9 +326,11 @@ library
"-Wl,-u,hs_atomicwrite8"
"-Wl,-u,hs_atomicwrite16"
"-Wl,-u,hs_atomicwrite32"
+#if defined(DEBUG)
-- This symbol is useful in gdb, but not referred to anywhere,
-- so we need to force it to be included in the binary.
"-Wl,-u,findPtr"
+#endif
if os(osx)
ld-options: "-Wl,-search_paths_first"
More information about the ghc-commits
mailing list