added stix_bitandints() and stix_bitorints()

This commit is contained in:
hyunghwan.chung
2015-12-10 14:23:09 +00:00
parent 9d88821c9b
commit 887a03c05e
5 changed files with 338 additions and 2 deletions

View File

@ -108,6 +108,29 @@
self primitiveFailed.
}
#method bitAnd: aNumber
{
<primitive: #_integer_bitand>
self primitiveFailed.
}
#method bitOr: aNumber
{
<primitive: #_integer_bitor>
self primitiveFailed.
}
#method bitXor: aNumber
{
<primitive: #_integer_bitxor>
self primitiveFailed.
}
#method bitInvert
{
<primitive: #_integer_bitinvert>
self primitiveFailed.
}
#method asString
{

View File

@ -320,6 +320,11 @@ PROCESS TESTING
##(-270 \\ 5) dump.
##(-270 // 5) dump.
##(16rFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF bitAnd: 16r1111111111111111111111111111111111111111) dump.
(16rF0FFFF bitOr: 16r111111) dump.
(16r11 bitOr: 16r20000000000000000000000000000000FFFFFFFFFFFFFFFF11111100000000000000000001) dump.
"
FFI isNil dump.
FFI notNil dump.