]> gitweb.factorcode.org Git - factor.git/blob - extra/smalltalk/compiler/return/return-tests.factor
15a3406ffc9007bc5f07d73f175362a2a6ce0c12
[factor.git] / extra / smalltalk / compiler / return / return-tests.factor
1 USING: smalltalk.parser smalltalk.compiler.return tools.test ;
2
3 [ t ] [ "(i <= 1) ifTrue: [^1] ifFalse: [^((Fib new i:(i-1)) compute + (Fib new i:(i-2)) compute)]" parse-smalltalk need-return-continuation? ] unit-test