wait-for-stdin ( stdin -- size )

Vocabulary

io.backend.unix

Inputs

stdin

an object

Outputs

size

an object

Definition

USING: accessors alien.c-types alien.data io kernel ;

IN: io.backend.unix

: wait-for-stdin ( stdin -- size )
    [ control>> 88 over stream-write1 stream-flush ]
    [ size>> ssize_t swap stream-read-c-ptr ] bi ;