diff options
Diffstat (limited to 'compiler/GHC/Builtin/primops.txt.pp')
-rw-r--r-- | compiler/GHC/Builtin/primops.txt.pp | 24 |
1 files changed, 12 insertions, 12 deletions
diff --git a/compiler/GHC/Builtin/primops.txt.pp b/compiler/GHC/Builtin/primops.txt.pp index 7e61678301..e9a9e96cee 100644 --- a/compiler/GHC/Builtin/primops.txt.pp +++ b/compiler/GHC/Builtin/primops.txt.pp @@ -291,8 +291,8 @@ section "Int8#" primtype Int8# -primop Int8ExtendOp "extendInt8#" GenPrimOp Int8# -> Int# -primop Int8NarrowOp "narrowInt8#" GenPrimOp Int# -> Int8# +primop Int8ToIntOp "extendInt8#" GenPrimOp Int8# -> Int# +primop IntToInt8Op "narrowInt8#" GenPrimOp Int# -> Int8# primop Int8NegOp "negateInt8#" GenPrimOp Int8# -> Int8# @@ -332,8 +332,8 @@ section "Word8#" primtype Word8# -primop Word8ExtendOp "extendWord8#" GenPrimOp Word8# -> Word# -primop Word8NarrowOp "narrowWord8#" GenPrimOp Word# -> Word8# +primop Word8ToWordOp "extendWord8#" GenPrimOp Word8# -> Word# +primop WordToWord8Op "narrowWord8#" GenPrimOp Word# -> Word8# primop Word8NotOp "notWord8#" GenPrimOp Word8# -> Word8# @@ -373,8 +373,8 @@ section "Int16#" primtype Int16# -primop Int16ExtendOp "extendInt16#" GenPrimOp Int16# -> Int# -primop Int16NarrowOp "narrowInt16#" GenPrimOp Int# -> Int16# +primop Int16ToIntOp "extendInt16#" GenPrimOp Int16# -> Int# +primop IntToInt16Op "narrowInt16#" GenPrimOp Int# -> Int16# primop Int16NegOp "negateInt16#" GenPrimOp Int16# -> Int16# @@ -414,8 +414,8 @@ section "Word16#" primtype Word16# -primop Word16ExtendOp "extendWord16#" GenPrimOp Word16# -> Word# -primop Word16NarrowOp "narrowWord16#" GenPrimOp Word# -> Word16# +primop Word16ToWordOp "extendWord16#" GenPrimOp Word16# -> Word# +primop WordToWord16Op "narrowWord16#" GenPrimOp Word# -> Word16# primop Word16NotOp "notWord16#" GenPrimOp Word16# -> Word16# @@ -455,8 +455,8 @@ section "Int32#" primtype Int32# -primop Int32ExtendOp "extendInt32#" GenPrimOp Int32# -> Int# -primop Int32NarrowOp "narrowInt32#" GenPrimOp Int# -> Int32# +primop Int32ToIntOp "extendInt32#" GenPrimOp Int32# -> Int# +primop IntToInt32Op "narrowInt32#" GenPrimOp Int# -> Int32# ------------------------------------------------------------------------ section "Word32#" @@ -465,8 +465,8 @@ section "Word32#" primtype Word32# -primop Word32ExtendOp "extendWord32#" GenPrimOp Word32# -> Word# -primop Word32NarrowOp "narrowWord32#" GenPrimOp Word# -> Word32# +primop Word32ToWordOp "extendWord32#" GenPrimOp Word32# -> Word# +primop WordToWord32Op "narrowWord32#" GenPrimOp Word# -> Word32# #if WORD_SIZE_IN_BITS < 64 ------------------------------------------------------------------------ |