new accessors

2008-08-29 02:14:22 -05:00 · 2008-08-29 02:14:22 -05:00 · 80f67f1ca7
parent e7167b47db
commit 80f67f1ca7
1 changed files with 1 additions and 1 deletions
--- a/basis/locals/locals.factor
+++ b/basis/locals/locals.factor
@ -418,7 +418,7 @@ M: lambda-memoized reset-word
 : method-stack-effect ( method -- effect )
    dup "lambda" word-prop vars>>
    swap "method-generic" word-prop stack-effect
-    dup [ effect-out ] when
+    dup [ out>> ] when
    <effect> ;

 M: lambda-method synopsis*