diff options
| author | Geoffrey Mainland <gmainlan@microsoft.com> | 2013-02-14 18:48:25 +0000 |
|---|---|---|
| committer | Geoffrey Mainland <gmainlan@microsoft.com> | 2013-09-22 22:33:59 -0400 |
| commit | 9d47e583e14923745380445ee52b16e69e926ebe (patch) | |
| tree | 8cd6241dcd8d3a3a1702ffbecd1dfce6ba6dd6b3 /compiler/cmm/CmmLex.x | |
| parent | 0c6cf2a83b65bcb873e574d4940823e7f1c67c65 (diff) | |
| download | haskell-9d47e583e14923745380445ee52b16e69e926ebe.tar.gz | |
Add Cmm support for 256-bit-wide values.
Diffstat (limited to 'compiler/cmm/CmmLex.x')
| -rw-r--r-- | compiler/cmm/CmmLex.x | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/compiler/cmm/CmmLex.x b/compiler/cmm/CmmLex.x index 81227eb05f..46f4cf5ce3 100644 --- a/compiler/cmm/CmmLex.x +++ b/compiler/cmm/CmmLex.x @@ -164,6 +164,7 @@ data CmmToken | CmmT_bits32 | CmmT_bits64 | CmmT_bits128 + | CmmT_bits256 | CmmT_float32 | CmmT_float64 | CmmT_gcptr @@ -244,6 +245,7 @@ reservedWordsFM = listToUFM $ ( "bits32", CmmT_bits32 ), ( "bits64", CmmT_bits64 ), ( "bits128", CmmT_bits128 ), + ( "bits256", CmmT_bits256 ), ( "float32", CmmT_float32 ), ( "float64", CmmT_float64 ), -- New forms @@ -252,6 +254,7 @@ reservedWordsFM = listToUFM $ ( "b32", CmmT_bits32 ), ( "b64", CmmT_bits64 ), ( "b128", CmmT_bits128 ), + ( "b256", CmmT_bits256 ), ( "f32", CmmT_float32 ), ( "f64", CmmT_float64 ), ( "gcptr", CmmT_gcptr ) |