]> gitweb.factorcode.org Git - factor.git/blob - basis/promises/promises-tests.factor
Fixes #2966
[factor.git] / basis / promises / promises-tests.factor
1 IN: promises.tests
2 USING: promises math tools.test ;
3
4 LAZY: lazy-test ( a -- b ) 1 + ;
5
6 { 1 1 } [ lazy-test ] must-infer-as
7 { 3 } [ 2 lazy-test force ] unit-test