ps-arg ( kp_proc -- arg )

Vocabulary

tools.ps.macosx.private

Inputs

kp_proc

an object

Outputs

arg

an object

Definition

USING: accessors continuations kernel sequences splitting
strings ;

IN: tools.ps.macosx.private

: ps-arg ( kp_proc -- arg )
    [ p_pid>> args rest join-words ]
    [ drop p_comm>> 0 over index [ head ] when* >string ]
    recover ;