added pid_t
This commit is contained in:
parent
b8e8ad9c81
commit
2a6d18e4b0
|
@ -54,7 +54,7 @@ extern char **environ;
|
||||||
|
|
||||||
/* Args: pid, flags; returns [retval, status] */
|
/* Args: pid, flags; returns [retval, status] */
|
||||||
|
|
||||||
s48_value wait_pid(int pid, int flags, int *result_pid, int *status)
|
s48_value wait_pid(pid_t pid, int flags, pid_t *result_pid, int *status)
|
||||||
{
|
{
|
||||||
*result_pid = waitpid(pid, status, flags);
|
*result_pid = waitpid(pid, status, flags);
|
||||||
return (*result_pid == -1) ? s48_enter_fixnum(errno) : S48_FALSE;
|
return (*result_pid == -1) ? s48_enter_fixnum(errno) : S48_FALSE;
|
||||||
|
|
|
@ -1,6 +1,6 @@
|
||||||
/* Exports from syscalls1.c. */
|
/* Exports from syscalls1.c. */
|
||||||
|
|
||||||
s48_value wait_pid(int pid, int flags, int *result_pid, int *status);
|
s48_value wait_pid(pid_t pid, int flags, pid_t *result_pid, int *status);
|
||||||
|
|
||||||
int scheme_exec(const char *prog, s48_value argv, s48_value env);
|
int scheme_exec(const char *prog, s48_value argv, s48_value env);
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue