summaryrefslogtreecommitdiff
path: root/compiler
diff options
context:
space:
mode:
authorSimon Marlow <marlowsd@gmail.com>2011-08-19 08:14:15 +0100
committerSimon Marlow <marlowsd@gmail.com>2011-08-19 08:14:15 +0100
commit548765e28739af5479e47e05bc4e6051cd709c66 (patch)
tree4914a7f5226c0fe598298cfdae7b66ff46c38aa9 /compiler
parent9282550cc1f1b7915642871cb6010ba45988683a (diff)
downloadhaskell-548765e28739af5479e47e05bc4e6051cd709c66.tar.gz
fix 32-bit build breakage
Diffstat (limited to 'compiler')
-rw-r--r--compiler/prelude/primops.txt.pp7
1 files changed, 1 insertions, 6 deletions
diff --git a/compiler/prelude/primops.txt.pp b/compiler/prelude/primops.txt.pp
index ee0ec22e6e..8cad832350 100644
--- a/compiler/prelude/primops.txt.pp
+++ b/compiler/prelude/primops.txt.pp
@@ -308,13 +308,8 @@ primop PopCnt16Op "popCnt16#" Monadic Word# -> Word#
{Count the number of set bits in the lower 16 bits of a word.}
primop PopCnt32Op "popCnt32#" Monadic Word# -> Word#
{Count the number of set bits in the lower 32 bits of a word.}
-#if WORD_SIZE_IN_BITS < 64
-primop PopCnt64Op "popCnt64#" Monadic Word64# -> Word#
- {Count the number of set bits in a 64-bit word.}
-#else
-primop PopCnt64Op "popCnt64#" Monadic Word# -> Word#
+primop PopCnt64Op "popCnt64#" GenPrimOp WORD64 -> Word#
{Count the number of set bits in a 64-bit word.}
-#endif
primop PopCntOp "popCnt#" Monadic Word# -> Word#
{Count the number of set bits in a word.}