change ERROR: words from throw-foo back to foo.

[factor.git] / extra / machine-learning / rebalancing / rebalancing.factor

diff --git a/extra/machine-learning/rebalancing/rebalancing.factor b/extra/machine-learning/rebalancing/rebalancing.factor
index df9c19beb8683137f30ebbf35430d457e0250440..41c3296eee853e89b40e68fcda73842ecff99ef6 100644 (file)
--- a/extra/machine-learning/rebalancing/rebalancing.factor
+++ b/extra/machine-learning/rebalancing/rebalancing.factor
@@ -7,7 +7,7 @@ IN: machine-learning.rebalancing
 ERROR: probability-sum-not-one seq ;
 
 : check-probabilities ( seq -- seq )
-    dup sum 1.0 .00000000001 ~ [ throw-probability-sum-not-one ] unless ;
+    dup sum 1.0 .00000000001 ~ [ probability-sum-not-one ] unless ;
 
 : equal-probabilities ( n -- array )
     dup recip <array> ; inline