effects: remove in-out

diff --git a/core/effects/effects.factor b/core/effects/effects.factor
index a79516932588d6f0821e3885b197780d8315b5de..97955390a1aa08c9bf885fd10bd46fc561c3c67a 100644 (file)
--- a/core/effects/effects.factor
+++ b/core/effects/effects.factor
@@ -11,8 +11,6 @@ TUPLE: effect
 { in-var read-only }
 { out-var read-only } ;
 
-: in-out ( effect -- in out ) [ in>> ] [ out>> ] bi ; inline
-
 : ?terminated ( out -- out terminated? )
     dup { "*" } = [ drop { } t ] [ f ] if ;