hyung-hwan/moo
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

added stix_bitxorint()

Browse Source
This commit is contained in:
hyunghwan.chung
2015-12-13 16:08:05 +00:00
parent 887a03c05e
commit bf412e0c07
5 changed files with 224 additions and 78 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
stix/kernel/Stix.st
View File

@ -128,11 +128,18 @@
#method bitInvert
{
<primitive: #_integer_bitinvert>
self primitiveFailed.
##<primitive: #_integer_bitinvert>
##self primitiveFailed.
^-1 - self.
}
#method asString
{
self printStringRadix: 10
}
#method printStringRadix: aNumber
{
<primitive: #_integer_inttostr>
self primitiveFailed.

7
stix/kernel/test-005.st
View File

@ -324,7 +324,14 @@ PROCESS TESTING
(16rF0FFFF bitOr: 16r111111) dump.
(16r11 bitOr: 16r20000000000000000000000000000000FFFFFFFFFFFFFFFF11111100000000000000000001) dump.
((16r11 bitOr: 16r20000000000000000000000000000000FFFFFFFFFFFFFFFF11111100000000000000000001) bitOr: 16r1100) dump.
((16r11 bitOr: $a) bitOr: 16r1100) dump.
(-20000000000000000000000000000000000000000 bitInvert printStringRadix: 2) dump.
((-2r101010 bitXor: 2r11101) printStringRadix: 2) dump.
((2r11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111 bitXor: 2r11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111) printStringRadix: 2) dump.
((2r10101010101010101010101010101010101010101010101010101010101010101010101010101010101010101010101010101010101010101010101010101010101010101 bitAnd: 2r01010101010101010101010101010101010101010101010101010101010101010101010101010101010101010101010101010101010101010101010101010101010101010) printStringRadix: 2) dump.
"
FFI isNil dump.
FFI notNil dump.