From 80f67f1ca716cdcf1956b89cad019952d24e0a97 Mon Sep 17 00:00:00 2001
From: Doug Coleman <doug.coleman@gmail.com>
Date: Fri, 29 Aug 2008 02:14:22 -0500
Subject: [PATCH] new accessors
---
basis/locals/locals.factor | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/basis/locals/locals.factor b/basis/locals/locals.factor
index a0b667e44b..bc05814348 100755
--- 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*