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