Merge branch 'master' of git://factorcode.org/git/factor

[factor.git] / extra / combinators / lib / lib.factor

diff --git a/extra/combinators/lib/lib.factor b/extra/combinators/lib/lib.factor
index f73a99c1a2f22b81862d8386c3186f79af841a44..99386272f39df4180a07f9cbbd4430e5ff60914f 100755 (executable)
--- a/extra/combinators/lib/lib.factor
+++ b/extra/combinators/lib/lib.factor
@@ -3,7 +3,8 @@
 ! See http://factorcode.org/license.txt for BSD license.
 USING: kernel combinators namespaces quotations hashtables
 sequences assocs arrays inference effects math math.ranges
-arrays.lib shuffle macros bake combinators.cleave ;
+arrays.lib shuffle macros bake combinators.cleave
+continuations ;
 
 IN: combinators.lib
 
@@ -174,3 +175,6 @@ MACRO: multikeep ( word out-indexes -- ... )
         %
         r> [ drop \ r> , ] each
     ] [ ] make ;
+
+: retry ( quot n -- )
+    [ drop ] rot compose attempt-all ; inline