diff options
author | Ben Gamari <ben@smart-cactus.org> | 2020-10-13 19:10:55 -0400 |
---|---|---|
committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2020-10-15 21:58:27 -0400 |
commit | cf10becdff4f8dba9bfa35326a1a338dccdd2b20 (patch) | |
tree | e7db6e71952ec84742e6e6a704d6cebd07a507d3 | |
parent | d495f36a8fb96f26fae4043364b8a7f38b884e00 (diff) | |
download | haskell-cf10becdff4f8dba9bfa35326a1a338dccdd2b20.tar.gz |
compiler/ByteCode: Use strict Maps in bytecode assembler
-rw-r--r-- | compiler/GHC/ByteCode/Asm.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/GHC/ByteCode/Asm.hs b/compiler/GHC/ByteCode/Asm.hs index 9ad8615d55..72d29e3260 100644 --- a/compiler/GHC/ByteCode/Asm.hs +++ b/compiler/GHC/ByteCode/Asm.hs @@ -59,9 +59,9 @@ import Data.Array.Unsafe( castSTUArray ) import Foreign import Data.Char ( ord ) import Data.List ( genericLength ) -import Data.Map (Map) +import Data.Map.Strict (Map) import Data.Maybe (fromMaybe) -import qualified Data.Map as Map +import qualified Data.Map.Strict as Map -- ----------------------------------------------------------------------------- -- Unlinked BCOs |