steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

io.backend.unix: fix handle-length on stdin.

paths
John Benediktsson 2018-03-13 13:53:26 -07:00
parent 5c69396fb3
commit b54da0f22b
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/io/backend/unix/unix.factor
View File

@ -173,6 +173,8 @@ M: stdin refill
M: stdin cancel-operation M: stdin cancel-operation
[ size>> ] [ control>> ] bi [ cancel-operation ] bi@ ; [ size>> ] [ control>> ] bi [ cancel-operation ] bi@ ;
M: stdin fd>> data>> handle-fd ; ! for handle-length
: control-write-fd ( -- fd ) &: control_write uint deref ; : control-write-fd ( -- fd ) &: control_write uint deref ;
: size-read-fd ( -- fd ) &: size_read uint deref ; : size-read-fd ( -- fd ) &: size_read uint deref ;