io-objects-from-iterator* ( i -- i array )

Vocabulary

iokit

Inputs

i

an object

Outputs

i	an object
array	an object

Definition

USING: kernel sequences ;

IN: iokit

: io-objects-from-iterator* ( i -- i array )
    [ dup IOIteratorNext dup MACH_PORT_NULL = not ] [ ] produce
    nip ;