diff --git a/basis/io/backend/unix/unix.factor b/basis/io/backend/unix/unix.factor
index 2468c53e58..e13d87d153 100755
--- a/basis/io/backend/unix/unix.factor
+++ b/basis/io/backend/unix/unix.factor
@@ -173,6 +173,8 @@ M: stdin refill
 M: stdin cancel-operation
     [ size>> ] [ control>> ] bi [ cancel-operation ] bi@ ;
 
+M: stdin fd>> data>> handle-fd ; ! for handle-length
+
 : control-write-fd ( -- fd ) &: control_write uint deref ;
 
 : size-read-fd ( -- fd ) &: size_read uint deref ;