lower-flag ( flag -- )
Flags

Prev:

wait-for-flag ( flag -- )

Vocabulary
concurrency.flags

Inputs

flag

a flag

Outputs
None

Word description
Attempts to lower a flag. If the flag has been raised previously, returns immediately, otherwise waits for it to be raised first.

Definition

USING: accessors kernel ;

IN: concurrency.flags

: lower-flag ( flag -- )
    [ wait-for-flag ] [ f >>value drop ] bi ;