diff options
| -rw-r--r-- | compiler/basicTypes/Literal.lhs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/basicTypes/Literal.lhs b/compiler/basicTypes/Literal.lhs index 0ebf5bfdc9..da8685e6b3 100644 --- a/compiler/basicTypes/Literal.lhs +++ b/compiler/basicTypes/Literal.lhs @@ -339,7 +339,7 @@ absent_lits :: UniqFM Literal absent_lits = listToUFM [ (addrPrimTyConKey, MachNullAddr) , (charPrimTyConKey, MachChar 'x') , (intPrimTyConKey, MachInt 0) - , (int64PrimTyConKey, MachInt 0) + , (int64PrimTyConKey, MachInt64 0) , (floatPrimTyConKey, MachFloat 0) , (doublePrimTyConKey, MachDouble 0) , (wordPrimTyConKey, MachWord 0) |