diff options
| author | Sylvain Henry <sylvain@haskus.fr> | 2020-11-05 14:29:33 +0100 |
|---|---|---|
| committer | Sylvain Henry <sylvain@haskus.fr> | 2021-01-05 15:02:58 +0100 |
| commit | 6c771aafa30e261f6822b3ddddbe66f8a55f307c (patch) | |
| tree | 0db9f845e28c38d5eaf618735f9be3ab892aa7f9 /compiler/GHC/Tc/Utils | |
| parent | 26a928b8fdb1b4ccb75e8edb620b8cf12cb38621 (diff) | |
| download | haskell-6c771aafa30e261f6822b3ddddbe66f8a55f307c.tar.gz | |
Implement Unique supply with Addr# atomic primop
Before this patch the compiler depended on the RTS way (threaded or not)
to use atomic incrementation or not. This is wrong because the RTS is
supposed to be switchable at link time, without recompilation.
Now we always use atomic incrementation of the unique counter.
Diffstat (limited to 'compiler/GHC/Tc/Utils')
| -rw-r--r-- | compiler/GHC/Tc/Utils/Monad.hs | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/compiler/GHC/Tc/Utils/Monad.hs b/compiler/GHC/Tc/Utils/Monad.hs index 240a836d72..7056ba898b 100644 --- a/compiler/GHC/Tc/Utils/Monad.hs +++ b/compiler/GHC/Tc/Utils/Monad.hs @@ -200,7 +200,6 @@ import GHC.Types.SrcLoc import GHC.Types.Name.Env import GHC.Types.Name.Set import GHC.Types.Name.Ppr -import GHC.Types.Unique (uniqFromMask) import GHC.Types.Unique.Supply import GHC.Types.Annotations import GHC.Types.Basic( TopLevelFlag, TypeOrKind(..) ) |