basis: ERROR: changes.

[factor.git] / basis / math / partial-dispatch / partial-dispatch.factor

diff --git a/basis/math/partial-dispatch/partial-dispatch.factor b/basis/math/partial-dispatch/partial-dispatch.factor
index 078908604489f7dac4206b5158c312c60d22e2ab..339ef5fb507d393ad7efa025b089f96e69750778 100644 (file)
--- a/basis/math/partial-dispatch/partial-dispatch.factor
+++ b/basis/math/partial-dispatch/partial-dispatch.factor
@@ -19,7 +19,7 @@ ERROR: bad-integer-op word ;
 
 M: word integer-op-input-classes
     dup "input-classes" word-prop
-    [ ] [ bad-integer-op ] ?if ;
+    [ ] [ throw-bad-integer-op ] ?if ;
 
 : generic-variant ( op -- generic-op/f )
     dup "derived-from" word-prop [ first ] [ ] ?if ;