[commit: ghc] wip/merge-queue: rts: Use always-available locking operations in pthread Itimer implementation (de5bed4)

git at git.haskell.org git at git.haskell.org
Sun Jan 13 00:06:09 UTC 2019


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

On branch  : wip/merge-queue
Link       : http://ghc.haskell.org/trac/ghc/changeset/de5bed4064380343cc8286eea626e38d64fd1f68/ghc

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

commit de5bed4064380343cc8286eea626e38d64fd1f68
Author: Ben Gamari <ben at smart-cactus.org>
Date:   Wed Jan 9 09:17:05 2019 -0500

    rts: Use always-available locking operations in pthread Itimer implementation
    
    Previously we ACQUIRE_LOCK and RELEASE_LOCK but these compile to a noop in the
    non-threaded RTS, as noted in #16150. Use OS_ACQUIRE_LOCK and OS_RELEASE_LOCK
    instead.


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

de5bed4064380343cc8286eea626e38d64fd1f68
 rts/posix/itimer/Pthread.c | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/rts/posix/itimer/Pthread.c b/rts/posix/itimer/Pthread.c
index 817c40f..6f9cd8f 100644
--- a/rts/posix/itimer/Pthread.c
+++ b/rts/posix/itimer/Pthread.c
@@ -134,12 +134,12 @@ static void *itimer_thread_func(void *_handle_tick)
 
         // first try a cheap test
         if (stopped) {
-            ACQUIRE_LOCK(&mutex);
+            OS_ACQUIRE_LOCK(&mutex);
             // should we really stop?
             if (stopped) {
                 waitCondition(&start_cond, &mutex);
             }
-            RELEASE_LOCK(&mutex);
+            OS_RELEASE_LOCK(&mutex);
         } else {
             handle_tick(0);
         }
@@ -176,19 +176,19 @@ initTicker (Time interval, TickProc handle_tick)
 void
 startTicker(void)
 {
-    ACQUIRE_LOCK(&mutex);
+    OS_ACQUIRE_LOCK(&mutex);
     stopped = 0;
     signalCondition(&start_cond);
-    RELEASE_LOCK(&mutex);
+    OS_RELEASE_LOCK(&mutex);
 }
 
 /* There may be at most one additional tick fired after a call to this */
 void
 stopTicker(void)
 {
-    ACQUIRE_LOCK(&mutex);
+    OS_ACQUIRE_LOCK(&mutex);
     stopped = 1;
-    RELEASE_LOCK(&mutex);
+    OS_RELEASE_LOCK(&mutex);
 }
 
 /* There may be at most one additional tick fired after a call to this */



More information about the ghc-commits mailing list