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

[factor.git] / core / generic / generic.factor

diff --git a/core/generic/generic.factor b/core/generic/generic.factor
index cd773a89f1167467db9749aa715ea43eff8fca53..c861f7c54bc894dd9c3c90fd1711f5ceae24f75d 100644 (file)
--- a/core/generic/generic.factor
+++ b/core/generic/generic.factor
@@ -30,7 +30,7 @@ ERROR: method-lookup-failed class generic ;
     "methods" word-prop at ;
 
 : lookup-method ( class generic -- method )
-    2dup ?lookup-method [ 2nip ] [ throw-method-lookup-failed ] if* ;
+    2dup ?lookup-method [ 2nip ] [ method-lookup-failed ] if* ;
 
 <PRIVATE