next-change ( monitor -- change )
File system change monitors

Prev:	<monitor> ( path recursive? -- monitor )
Next:	(monitor) ( path recursive? mailbox -- monitor )

Vocabulary
io.monitors

Inputs

monitor

a monitor

Outputs

change

a file-change

Generic word contract
Waits for file system changes and outputs a change descriptor for the first changed file.

Errors
Throws an error if the monitor is closed from another thread.

Definition

USING: accessors concurrency.mailboxes destructors
io.monitors.private io.timeouts kernel ;

IN: io.monitors

: next-change ( monitor -- change )
    check-disposed [ ] [ queue>> ] [ timeout ] tri
    mailbox-get-timeout dup monitor-disposed eq?
    [ drop already-disposed ] [ nip ] if ;