(with-effective-group) ( string/id quot -- )

Vocabulary

unix.groups

Inputs

string/id	an object
quot	an object

Outputs

None

Definition

USING: continuations kernel ;

IN: unix.groups

: (with-effective-group) ( string/id quot -- )
    [ [ set-effective-group ] curry ] dip compose
    effective-group-id [ set-effective-group ] curry finally ;
    inline