summaryrefslogtreecommitdiffstats
path: root/otherlibs/win32unix/winwait.c
diff options
context:
space:
mode:
Diffstat (limited to 'otherlibs/win32unix/winwait.c')
-rw-r--r--otherlibs/win32unix/winwait.c19
1 files changed, 8 insertions, 11 deletions
diff --git a/otherlibs/win32unix/winwait.c b/otherlibs/win32unix/winwait.c
index 16fbece8f..07bed46f1 100644
--- a/otherlibs/win32unix/winwait.c
+++ b/otherlibs/win32unix/winwait.c
@@ -22,18 +22,15 @@
static value alloc_process_status(pid, status)
int pid, status;
{
- value st, res;
- Push_roots(r, 1);
+ value res;
+ value st = alloc(1, 0);
-
- st = alloc(1, 0);
- Field(st, 0) = Val_int(status);
-
- r[0] = st;
- res = alloc_tuple(2);
- Field(res, 0) = Val_int(pid);
- Field(res, 1) = r[0];
- Pop_roots();
+ Begin_root (st);
+ Field(st, 0) = Val_int(status);
+ res = alloc_tuple(2);
+ Field(res, 0) = Val_int(pid);
+ Field(res, 1) = st;
+ End_roots();
return res;
}