/* Exports from syscalls1.c. */ s48_value wait_pid(s48_value pid, s48_value flags); s48_value scheme_exec(s48_value prog, s48_value argv, s48_value env); s48_value scsh_exit (s48_value status); s48_value scsh__exit (s48_value status); s48_value scsh_fork (); s48_value scheme_pipe(); s48_value scsh_kill (s48_value pid, s48_value signal); s48_value scm_readlink(s48_value path); int scm_utime(char const *path, time_t ac, time_t mod); int scm_utime_now(char const *path); s48_value set_cloexec(s48_value _fd, s48_value _val); s48_value scsh_chdir(s48_value directory); s48_value scheme_cwd(); int process_times(clock_t *utime, clock_t *stime, clock_t *cutime, clock_t *cstime); int cpu_clock_ticks_per_sec(); s48_value read_fdes_char(int fd); int write_fdes_char(char c, int fd); ssize_t read_fdes_substring(s48_value buf, size_t start, size_t end, int fd); int read_stream_substring(s48_value buf, int start, int end, FILE *f); ssize_t write_fdes_substring(s48_value buf, size_t start, size_t end, int fd); int write_stream_substring(s48_value buf, int start, int end, FILE *f); s48_value scheme_stat(s48_value path, s48_value vec, s48_value chase_p); s48_value scheme_fstat(s48_value fd, s48_value vec); s48_value scsh_getgid(); s48_value scsh_getegid(); s48_value scsh_setgid(s48_value gid); s48_value scsh_setegid(s48_value gid); s48_value get_groups(); s48_value scsh_getuid(); s48_value scsh_geteuid(); s48_value scsh_setuid(s48_value uid); s48_value scsh_seteuid(s48_value uid); int put_env(const char *s); s48_value scm_envvec(void); int install_env(s48_value vec); s48_value delete_env(s48_value var); s48_value scm_gethostname(void); char *errno_msg(int i); s48_value fcntl_read(s48_value fd, s48_value command); s48_value fcntl_write(s48_value fd, s48_value command, s48_value value); s48_value scm_crypt(s48_value key, s48_value salt); s48_value scm_openlog (s48_value _ident, s48_value _option, s48_value _facility); s48_value scm_syslog (s48_value _facility, s48_value _level, s48_value _message); s48_value scm_closelog();