+lib "crypt";
-//extern int pipe(int fildes[2]);
+#include <unistd.h>
function \pipe(array &$fds = null) : int {
- return to_int(pipe);
- let fildes = calloc(2, psi\SIZEOF_INT);
- set $fds = to_array(fildes[2]);
+ return pipe(fildes) as to_int(pipe);
+ let fildes = calloc(2, sizeof(int));
+ set $fds = to_array(*fildes, 2, to_int(*fildes));
}