[commit: ghc] master: rts: mark 'removeFromRunQueue' as static (39cba20)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/39cba209ac99c94ec6cdbc880d475e606eb8c5da/ghc

>---------------------------------------------------------------

commit 39cba209ac99c94ec6cdbc880d475e606eb8c5da
Author: Sergei Trofimovich <siarheit at google.com>
Date:   Sun Feb 7 17:33:02 2016 +0000

    rts: mark 'removeFromRunQueue' as static
    
    Noticed by uselex.rb:
        removeFromRunQueue: [R]: exported from:
            ./rts/dist/build/Schedule.o
    
    Signed-off-by: Sergei Trofimovich <siarheit at google.com>


>---------------------------------------------------------------

39cba209ac99c94ec6cdbc880d475e606eb8c5da
 rts/Schedule.c | 2 +-
 rts/Schedule.h | 3 +--
 2 files changed, 2 insertions(+), 3 deletions(-)

diff --git a/rts/Schedule.c b/rts/Schedule.c
index e3dd881..89c5cde 100644
--- a/rts/Schedule.c
+++ b/rts/Schedule.c
@@ -557,7 +557,7 @@ run_thread:
  * Run queue operations
  * -------------------------------------------------------------------------- */
 
-void
+static void
 removeFromRunQueue (Capability *cap, StgTSO *tso)
 {
     if (tso->block_info.prev == END_TSO_QUEUE) {
diff --git a/rts/Schedule.h b/rts/Schedule.h
index eb5135b..67e2fdc 100644
--- a/rts/Schedule.h
+++ b/rts/Schedule.h
@@ -187,8 +187,7 @@ peekRunQueue (Capability *cap)
     return cap->run_queue_hd;
 }
 
-void removeFromRunQueue (Capability *cap, StgTSO *tso);
-extern void promoteInRunQueue (Capability *cap, StgTSO *tso);
+void promoteInRunQueue (Capability *cap, StgTSO *tso);
 
 /* Add a thread to the end of the blocked queue.
  */