diff --git a/basis/compiler/tests/codegen.factor b/basis/compiler/tests/codegen.factor index 1463dbadb5..8f7bc077b4 100644 --- a/basis/compiler/tests/codegen.factor +++ b/basis/compiler/tests/codegen.factor @@ -316,4 +316,6 @@ M: cucumber equal? "The cucumber has no equal" throw ; [ t ] [ 2 [ 1 swap fixnum< ] compile-call ] unit-test [ 3 ] [ 2 [ 1 swap fixnum< [ 3 ] [ 4 ] if ] compile-call ] unit-test -[ 0 ] [ 101 [ dup fixnum-fast 1 fixnum+fast 20 fixnum-shift-fast 20 fixnum-shift-fast ] compile-call ] unit-test \ No newline at end of file +cell 4 = [ + [ 0 ] [ 101 [ dup fixnum-fast 1 fixnum+fast 20 fixnum-shift-fast 20 fixnum-shift-fast ] compile-call ] unit-test +] when \ No newline at end of file