basis: ERROR: changes.

[factor.git] / basis / compiler / cfg / intrinsics / intrinsics.factor

diff --git a/basis/compiler/cfg/intrinsics/intrinsics.factor b/basis/compiler/cfg/intrinsics/intrinsics.factor
index 24b7e05bdc25b8d0c3e97a6c071e40468580b375..aaace50e56dac90e0160400959977930b4c818db 100644 (file)
--- a/basis/compiler/cfg/intrinsics/intrinsics.factor
+++ b/basis/compiler/cfg/intrinsics/intrinsics.factor
@@ -28,7 +28,7 @@ ERROR: inline-intrinsics-not-supported word quot ;
 
 : enable-intrinsics ( alist -- )
     [
-        over inline? [ inline-intrinsics-not-supported ] when
+        over inline? [ throw-inline-intrinsics-not-supported ] when
         "intrinsic" set-word-prop
     ] assoc-each ;