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