diff options
| author | Ian Lynagh <igloo@earth.li> | 2012-04-20 18:54:25 +0100 |
|---|---|---|
| committer | Ian Lynagh <igloo@earth.li> | 2012-04-20 18:54:25 +0100 |
| commit | 6508697f398fa4e9241cec88991772eda86e37b3 (patch) | |
| tree | 68d816c20dc6ce2d3618f753ff56aded0590387e | |
| parent | 6ba8b3309709fa1ad43382e23792b1c4a624d7ad (diff) | |
| download | haskell-6508697f398fa4e9241cec88991772eda86e37b3.tar.gz | |
Add a couple of comments
| -rw-r--r-- | compiler/prelude/primops.txt.pp | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/compiler/prelude/primops.txt.pp b/compiler/prelude/primops.txt.pp index 4d452c02ea..037915abd5 100644 --- a/compiler/prelude/primops.txt.pp +++ b/compiler/prelude/primops.txt.pp @@ -269,6 +269,7 @@ primtype Word# primop WordAddOp "plusWord#" Dyadic Word# -> Word# -> Word# with commutable = True +-- Returns (# high, low #) (or equivalently, (# carry, low #)) primop WordAdd2Op "plusWord2#" GenPrimOp Word# -> Word# -> (# Word#, Word# #) with commutable = True @@ -278,6 +279,7 @@ primop WordSubOp "minusWord#" Dyadic Word# -> Word# -> Word# primop WordMulOp "timesWord#" Dyadic Word# -> Word# -> Word# with commutable = True +-- Returns (# high, low #) primop WordMul2Op "timesWord2#" GenPrimOp Word# -> Word# -> (# Word#, Word# #) with commutable = True |