diff options
| author | Sergei Trofimovich <siarheit@google.com> | 2016-02-07 17:33:02 +0000 |
|---|---|---|
| committer | Sergei Trofimovich <siarheit@google.com> | 2016-02-07 20:27:27 +0000 |
| commit | 39cba209ac99c94ec6cdbc880d475e606eb8c5da (patch) | |
| tree | 8dd258fd874a9c7f159272b5b27ebd54a9b67003 | |
| parent | 8abc7e76ecd9bdd31ace27ed24b3d42522d2f189 (diff) | |
| download | haskell-39cba209ac99c94ec6cdbc880d475e606eb8c5da.tar.gz | |
rts: mark 'removeFromRunQueue' as static
Noticed by uselex.rb:
removeFromRunQueue: [R]: exported from:
./rts/dist/build/Schedule.o
Signed-off-by: Sergei Trofimovich <siarheit@google.com>
| -rw-r--r-- | rts/Schedule.c | 2 | ||||
| -rw-r--r-- | rts/Schedule.h | 3 |
2 files changed, 2 insertions, 3 deletions
diff --git a/rts/Schedule.c b/rts/Schedule.c index e3dd88151c..89c5cde079 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 eb5135b365..67e2fdc011 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. */ |