setup-priority ( process -- process )

Vocabulary

io.launcher.unix

Inputs

process

an object

Outputs

process

an object

Definition

USING: accessors combinators io.launcher kernel unix.process ;

IN: io.launcher.unix

: setup-priority ( process -- process )
    dup priority>> [
        {
            { +lowest-priority+ [ 20 ] }
            { +low-priority+ [ 10 ] }
            { +normal-priority+ [ 0 ] }
            { +high-priority+ [ -10 ] }
            { +highest-priority+ [ -20 ] }
            { +realtime-priority+ [ -20 ] }
        } case set-priority
    ] when* ;