]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/concurrency/count-downs/count-downs.factor
change ERROR: words from throw-foo back to foo.
[factor.git] / basis / concurrency / count-downs / count-downs.factor
index 0a5891d7e2bfe1c60612b014dfa158660b744fa7..c5d1d57985dce08e3fb85849de5bafe6fdee3e64 100755 (executable)
@@ -14,7 +14,7 @@ TUPLE: count-down-tuple n promise ;
 ERROR: invalid-count-down-count count ;
 
 : <count-down> ( n -- count-down )
-    dup 0 < [ throw-invalid-count-down-count ] when
+    dup 0 < [ invalid-count-down-count ] when
     <promise> \ count-down-tuple boa
     dup count-down-check ;
 
@@ -22,7 +22,7 @@ ERROR: count-down-already-done ;
 
 : count-down ( count-down -- )
     dup n>> dup zero?
-    [ throw-count-down-already-done ]
+    [ count-down-already-done ]
     [ 1 - >>n count-down-check ] if ;
 
 : await-timeout ( count-down timeout -- )