diff options
| author | Krzysztof Gogolewski <krzysztof.gogolewski@tweag.io> | 2022-03-30 21:11:54 +0200 |
|---|---|---|
| committer | Matthew Pickering <matthewtpickering@gmail.com> | 2022-04-01 11:14:08 +0100 |
| commit | f8f152e7089af9a5434408e17ff071999d381ee1 (patch) | |
| tree | d00356e813c0fd95dbf81b796798f35fbe46e32a /testsuite/tests/concurrent | |
| parent | 691508d87ec089e46524461a5c6ec59b1c17be4c (diff) | |
| download | haskell-f8f152e7089af9a5434408e17ff071999d381ee1.tar.gz | |
Change GHC.Prim to GHC.Exts in docs and tests
Users are supposed to import GHC.Exts rather than GHC.Prim.
Part of #18749.
Diffstat (limited to 'testsuite/tests/concurrent')
5 files changed, 4 insertions, 5 deletions
diff --git a/testsuite/tests/concurrent/should_run/T367_letnoescape.hs b/testsuite/tests/concurrent/should_run/T367_letnoescape.hs index 5230509e71..0e91ea693a 100644 --- a/testsuite/tests/concurrent/should_run/T367_letnoescape.hs +++ b/testsuite/tests/concurrent/should_run/T367_letnoescape.hs @@ -4,7 +4,6 @@ import Control.Concurrent import GHC.Conc -import GHC.Prim import GHC.Exts main = do diff --git a/testsuite/tests/concurrent/should_run/hs_try_putmvar001.hs b/testsuite/tests/concurrent/should_run/hs_try_putmvar001.hs index af4eabb263..a16ae482cb 100644 --- a/testsuite/tests/concurrent/should_run/hs_try_putmvar001.hs +++ b/testsuite/tests/concurrent/should_run/hs_try_putmvar001.hs @@ -6,7 +6,7 @@ import Control.Exception import Foreign import Foreign.C import GHC.Conc -import GHC.Prim +import GHC.Exts -- Sample code demonstrating proper use of hs_try_putmvar() diff --git a/testsuite/tests/concurrent/should_run/hs_try_putmvar002.hs b/testsuite/tests/concurrent/should_run/hs_try_putmvar002.hs index a8eac42dec..d1130981d6 100644 --- a/testsuite/tests/concurrent/should_run/hs_try_putmvar002.hs +++ b/testsuite/tests/concurrent/should_run/hs_try_putmvar002.hs @@ -7,7 +7,7 @@ import Control.Monad import Foreign hiding (void) import Foreign.C import GHC.Conc -import GHC.Prim +import GHC.Exts import System.Environment -- Measure raw throughput, for M threads that each do N calls to C diff --git a/testsuite/tests/concurrent/should_run/hs_try_putmvar003.hs b/testsuite/tests/concurrent/should_run/hs_try_putmvar003.hs index caaadc1aae..6677207665 100644 --- a/testsuite/tests/concurrent/should_run/hs_try_putmvar003.hs +++ b/testsuite/tests/concurrent/should_run/hs_try_putmvar003.hs @@ -8,7 +8,7 @@ import Foreign hiding (void) import Foreign.C import GHC.Conc import GHC.MVar (MVar(..)) -import GHC.Prim +import GHC.Exts import System.Environment import System.Exit import Unsafe.Coerce diff --git a/testsuite/tests/concurrent/should_run/setnumcapabilities001.hs b/testsuite/tests/concurrent/should_run/setnumcapabilities001.hs index a18d75aeef..436c068b29 100644 --- a/testsuite/tests/concurrent/should_run/setnumcapabilities001.hs +++ b/testsuite/tests/concurrent/should_run/setnumcapabilities001.hs @@ -1,7 +1,7 @@ {-# LANGUAGE MagicHash, UnboxedTuples #-} import GHC.Conc -import GHC.Prim +import GHC.Exts import System.Environment import System.IO import Control.Monad |