basis: ERROR: changes.

[factor.git] / basis / compiler / cfg / representations / conversion / conversion.factor

diff --git a/basis/compiler/cfg/representations/conversion/conversion.factor b/basis/compiler/cfg/representations/conversion/conversion.factor
index e01a030495b907e8105a547831417aad01bae95a..01b447a3fe844016856d67d8316fcc8c5f6246a8 100644 (file)
--- a/basis/compiler/cfg/representations/conversion/conversion.factor
+++ b/basis/compiler/cfg/representations/conversion/conversion.factor
@@ -77,7 +77,7 @@ M: scalar-rep int>rep ( dst src rep -- )
                 ! it is allowed... otherwise bail out.
                 [
                     drop 2dup [ reg-class-of ] bi@ eq?
-                    [ drop ##copy, ] [ bad-conversion ] if
+                    [ drop ##copy, ] [ throw-bad-conversion ] if
                 ]
             } case
         ]