[commit: ghc] master: rts: mark 'copied' as static (4f283a6)
git at git.haskell.org
git at git.haskell.org
Sun Feb 7 20:28:17 UTC 2016
Repository : ssh://git@git.haskell.org/ghc
On branch : master
Link : http://ghc.haskell.org/trac/ghc/changeset/4f283a6f84e76b3e8e1041eab1bbb9f8c63ce3fd/ghc
>---------------------------------------------------------------
commit 4f283a6f84e76b3e8e1041eab1bbb9f8c63ce3fd
Author: Sergei Trofimovich <siarheit at google.com>
Date: Sun Feb 7 16:41:06 2016 +0000
rts: mark 'copied' as static
Noticed by uselex.rb:
copied: [R]: exported from:
./rts/dist/build/sm/GC.o
Signed-off-by: Sergei Trofimovich <siarheit at google.com>
>---------------------------------------------------------------
4f283a6f84e76b3e8e1041eab1bbb9f8c63ce3fd
rts/sm/GC.c | 2 +-
rts/sm/GC.h | 2 --
2 files changed, 1 insertion(+), 3 deletions(-)
diff --git a/rts/sm/GC.c b/rts/sm/GC.c
index 95d9951..d861db9 100644
--- a/rts/sm/GC.c
+++ b/rts/sm/GC.c
@@ -129,7 +129,7 @@ StgWord8 the_gc_thread[sizeof(gc_thread) + 64 * sizeof(gen_workspace)];
nat n_gc_threads;
// For stats:
-long copied; // *words* copied & scavenged during this GC
+static long copied; // *words* copied & scavenged during this GC
rtsBool work_stealing;
diff --git a/rts/sm/GC.h b/rts/sm/GC.h
index 5744eb9..2953d9e 100644
--- a/rts/sm/GC.h
+++ b/rts/sm/GC.h
@@ -34,8 +34,6 @@ extern bdescr *mark_stack_bd;
extern bdescr *mark_stack_top_bd;
extern StgPtr mark_sp;
-extern long copied;
-
extern rtsBool work_stealing;
#ifdef DEBUG
More information about the ghc-commits
mailing list