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

Vocabulary

unix.groups

Inputs

string/id	an object
quot	an object

Outputs

None

Definition

USING: continuations ;

IN: unix.groups

: (with-effective-group) ( string/id quot -- )
    '[ _ set-effective-group @ ] effective-group-id
    '[ _ set-effective-group ] finally ; inline