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

[factor.git] / extra / decimals / decimals.factor

diff --git a/extra/decimals/decimals.factor b/extra/decimals/decimals.factor
index 23fa3a273d35dd5435566c77d33646d34cd89a7a..1d244f0355a29f1f6dbae0188b9aface42a05eb1 100644 (file)
--- a/extra/decimals/decimals.factor
+++ b/extra/decimals/decimals.factor
@@ -43,7 +43,7 @@ ERROR: decimal-types-expected d1 d2 ;
 
 : guard-decimals ( obj1 obj2 -- D1 D2 )
     2dup [ decimal? ] both?
-    [ throw-decimal-types-expected ] unless ;
+    [ decimal-types-expected ] unless ;
 
 M: decimal equal?
     {