tools.scaffold: in-out removal

[factor.git] / basis / tools / scaffold / scaffold.factor

diff --git a/basis/tools/scaffold/scaffold.factor b/basis/tools/scaffold/scaffold.factor
index b19357cec915fc4089f46ef704716e672a403859..4d956fc6f4d6b74ec0b8ca463dd1b412d0c23dc5 100644 (file)
--- a/basis/tools/scaffold/scaffold.factor
+++ b/basis/tools/scaffold/scaffold.factor
@@ -173,7 +173,7 @@ M: object add-using
 
 : $values. ( word -- )
     "declared-effect" word-prop [
-        in-out
+        [ in>> ] [ out>> ] bi
         2dup [ empty? ] both? [
             2drop
         ] [