X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=blobdiff_plain;f=core%2Feffects%2Feffects-tests.factor;h=37d4fd1195d0b72bf2992b0d04475268d33f86ea;hp=3eb92738595188d03b661e890ee1829df316e6b8;hb=3f3d57032bf29190e9bee12d168a4bce6d74653c;hpb=cd1bb8f4c8afba318249c7b756a45aa1c46ea51e diff --git a/core/effects/effects-tests.factor b/core/effects/effects-tests.factor index 3eb9273859..37d4fd1195 100644 --- a/core/effects/effects-tests.factor +++ b/core/effects/effects-tests.factor @@ -1,5 +1,5 @@ -IN: effects.tests USING: effects tools.test prettyprint accessors sequences ; +IN: effects.tests [ t ] [ 1 1 2 2 effect<= ] unit-test [ f ] [ 1 0 2 2 effect<= ] unit-test @@ -22,4 +22,4 @@ USING: effects tools.test prettyprint accessors sequences ; [ t ] [ (( -- )) (( -- )) compose-effects (( -- )) effect= ] unit-test [ t ] [ (( -- * )) (( -- )) compose-effects (( -- * )) effect= ] unit-test -[ t ] [ (( -- )) (( -- * )) compose-effects (( -- * )) effect= ] unit-test \ No newline at end of file +[ t ] [ (( -- )) (( -- * )) compose-effects (( -- * )) effect= ] unit-test