basis: ERROR: changes.

[factor.git] / basis / typed / namespaces / namespaces.factor

diff --git a/basis/typed/namespaces/namespaces.factor b/basis/typed/namespaces/namespaces.factor
index f86ad952a37ab62b02277a453930422422872000..5b371ea0d61586e4fe760cec5410072e957c1d36 100644 (file)
--- a/basis/typed/namespaces/namespaces.factor
+++ b/basis/typed/namespaces/namespaces.factor
@@ -19,7 +19,7 @@ PRIVATE>
 
 :: (typed-get) ( name type getter: ( name -- value ) -- value )
     name getter call :> value
-    value type instance? [ name value type variable-type-error ] unless
+    value type instance? [ name value type throw-variable-type-error ] unless
     value type declare1 ; inline
 
 : typed-get ( name type -- value )
@@ -29,7 +29,7 @@ PRIVATE>
     [ get-global ] (typed-get) ; inline
 
 :: (typed-set) ( value name type setter: ( value name -- ) -- )
-    value type instance? [ name value type variable-type-error ] unless
+    value type instance? [ name value type throw-variable-type-error ] unless
     value name setter call ; inline
 
 : typed-set ( value name type -- )