read-step ( count port -- count ptr/f )

Vocabulary

io.ports.private

Inputs

count	an object
port	an object

Outputs

count	an object
ptr/f	an object

Definition

USING: accessors alien combinators io.buffers io.ports kernel
kernel.private math ;

IN: io.ports.private

: read-step ( count port -- count ptr/f )
    {
        { [ over 0 = ] [ 2drop 0 f ] }
        { [ dup wait-to-read ] [ 2drop 0 f ] }
        [ buffer>> buffer-read-unsafe ]
    } cond { fixnum c-ptr } declare ; inline