Added unit tests
parent
ede5bb9243
commit
beeb4a90a1
|
@ -441,3 +441,15 @@ cell 8 = [
|
||||||
] keep 2 fixnum+fast
|
] keep 2 fixnum+fast
|
||||||
] compile-call
|
] compile-call
|
||||||
] unit-test
|
] unit-test
|
||||||
|
|
||||||
|
[ 1 ] [
|
||||||
|
8 -3 [ fixnum-shift-fast ] compile-call
|
||||||
|
] unit-test
|
||||||
|
|
||||||
|
[ 2 ] [
|
||||||
|
16 -3 [ fixnum-shift-fast ] compile-call
|
||||||
|
] unit-test
|
||||||
|
|
||||||
|
[ 8 ] [
|
||||||
|
1 3 [ fixnum-shift-fast ] compile-call
|
||||||
|
] unit-test
|
||||||
|
|
Loading…
Reference in New Issue