diff options
| author | Ben Gamari <ben@smart-cactus.org> | 2020-10-13 19:10:55 -0400 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2020-10-13 19:21:29 -0400 |
| commit | f7cba81b395dab1815d6ce944c5ba54c008f0511 (patch) | |
| tree | fa6a3916b38e5dcb46b2cbd4f6bad328d55d4064 | |
| parent | 75dd1f4ab0d861facf178b367fdb55036048d97e (diff) | |
| download | haskell-f7cba81b395dab1815d6ce944c5ba54c008f0511.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 e27af3ad1b..7218cb7321 100644 --- a/compiler/GHC/ByteCode/Asm.hs +++ b/compiler/GHC/ByteCode/Asm.hs @@ -57,9 +57,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 |