diff options
Diffstat (limited to 'core.e')
| -rw-r--r-- | core.e | 18 |
1 files changed, 17 insertions, 1 deletions
diff --git a/core.e b/core.e index 8c14948..1094e45 100644 --- a/core.e +++ b/core.e @@ -384,6 +384,8 @@ here ! :rax push-reg64 here ! ] ;asm +~ Is the top of the stack greater than the second item in the stack, when +~ both are treated as signed? : > [ here @ :rax pop-reg64 @@ -394,7 +396,8 @@ here ! :rax push-reg64 here ! ] ;asm -~ Is the top of the stack less than the second item in the stack? +~ Is the top of the stack less than the second item in the stack, when both +~ are treated as signed? : < [ here @ :rax pop-reg64 @@ -405,6 +408,8 @@ here ! :rax push-reg64 here ! ] ;asm +~ Is the top of the stack greater than or equal to the second item in the +~ stack, when both are treated as signed? : >= [ here @ :rax pop-reg64 @@ -415,6 +420,8 @@ here ! :rax push-reg64 here ! ] ;asm +~ Is the top of the stack less than or equal to the second item in the +~ stack, when both are treated as signed? : <= [ here @ :rax pop-reg64 @@ -425,6 +432,8 @@ here ! :rax push-reg64 here ! ] ;asm +~ Is the top of the stack greater than the second item in the stack, when +~ both are treated as unsigned? : >unsigned [ here @ :rax pop-reg64 @@ -435,6 +444,8 @@ here ! :rax push-reg64 here ! ] ;asm +~ Is the top of the stack less than the second item in the stack, when +~ both are treated as unsigned? : <unsigned [ here @ :rax pop-reg64 @@ -445,6 +456,8 @@ here ! :rax push-reg64 here ! ] ;asm +~ Is the top of the stack greater than or equal to the second item in the +~ stack, when both are treated as unsigned? : >=unsigned [ here @ :rax pop-reg64 @@ -455,6 +468,8 @@ here ! :rax push-reg64 here ! ] ;asm +~ Is the top of the stack less than or equal to the second item in the +~ stack, when both are treated as unsigned? : <=unsigned [ here @ :rax pop-reg64 @@ -465,6 +480,7 @@ here ! :rax push-reg64 here ! ] ;asm + ~ Bitwise routines ~ ~~~~~~~~~~~~~~~~ ~ |