[Git][ghc/ghc][wip/ghc-debug] Assure RTS is not paused after rts_unpause() (#18405)

[Sven Tennie]

Sven Tennie pushed to branch wip/ghc-debug at Glasgow Haskell Compiler / GHC


Commits:
f8b8f2a1 by Sven Tennie at 2020-09-11T10:04:18+02:00
Assure RTS is not paused after rts_unpause() (#18405)

Assert this invariant in tests.

- - - - -


1 changed file:

- testsuite/tests/rts/ghc-debug/pause_and_unpause_thread.c


Changes:

=====================================
testsuite/tests/rts/ghc-debug/pause_and_unpause_thread.c
=====================================
@@ -23,6 +23,11 @@ void* pauseAndUnpause_thread(void* unused){
 
     rts_unpause(r_paused);
 
+    if(rts_isPaused()) {
+        errorBelch("Expected the RTS to be unpaused.");
+        exit(1);
+    }
+
     return NULL;
 }
 



View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/f8b8f2a147e7df9a57cdcbd61c9ae1f7a9c0eb0e

-- 
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/f8b8f2a147e7df9a57cdcbd61c9ae1f7a9c0eb0e
You're receiving this email because of your account on gitlab.haskell.org.


-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.haskell.org/pipermail/ghc-commits/attachments/20200911/77906dbb/attachment.html>