1 /*
2  * Part of Scheme 48 1.9.  See file COPYING for notices and license.
3  *
4  * Authors: Richard Kelsey, Jonathan Rees, Marcus Crestani, Will Noble
5  */
6 
7 extern mode_t		s48_extract_mode(s48_call_t call, s48_ref_t sch_mode);
8 extern int		s48_extract_file_options(s48_call_t call, s48_ref_t sch_file_options);
9 
10 extern s48_ref_t	s48_enter_uid(s48_call_t call, uid_t uid);
11 extern uid_t		s48_extract_uid(s48_call_t call, s48_ref_t uid);
12 
13 extern s48_ref_t	s48_enter_gid(s48_call_t call, gid_t gid);
14 extern gid_t		s48_extract_gid(s48_call_t call, s48_ref_t gid);
15 
16