/* Exports from syscalls1.c. */

s48_value wait_pid(int pid, int flags, int *result_pid, int *status);

int scheme_exec(const char *prog, s48_value argv, s48_value env);

int scheme_pipe(int *r, int *w);

char const *scm_readlink(const char *path);

int scm_utime(char const *path, time_t ac, time_t  mod);

int scm_utime_now(char const *path);

int scheme_cwd(const char **dirp);

int process_times(int *utime, int *stime, int *cutime, int *cstime);

int cpu_clock_ticks_per_sec();

s48_value read_fdes_char(int fd);

int write_fdes_char(char c, int fd);

int read_fdes_substring(s48_value buf, int start, int end, int fd);

int read_stream_substring(s48_value buf, int start, int end, FILE *f);

int write_fdes_substring(s48_value buf, int start, int end, int fd);

int write_stream_substring(s48_value buf, int start, int end, FILE *f);

int scheme_stat(const char *path, s48_value vec, int chase_p);

int scheme_fstat(int fd, s48_value vec);

int num_supp_groups(void);

int get_groups(s48_value gvec);

int put_env(const char *s);

char** scm_envvec(int *len);

int install_env(s48_value vec);

void delete_env(const char *var);

char *scm_gethostname(void);

char *errno_msg(int i);

int fcntl_read(int fd, int command);

int fcntl_write(int fd, int command, int value);