X-Git-Url: https://git.m6w6.name/?a=blobdiff_plain;f=tests%2Fpipe%2Fpipe.psi;h=aab776d379bfe7884026d7ab386dd03e2d5f03a4;hb=HEAD;hp=d1961da8afc4b5bbf8d480405ea826c1fc21d558;hpb=9bcb1df0786a8193d65949c857baaba2f4296e84;p=m6w6%2Fext-psi diff --git a/tests/pipe/pipe.psi b/tests/pipe/pipe.psi index d1961da..aab776d 100644 --- a/tests/pipe/pipe.psi +++ b/tests/pipe/pipe.psi @@ -1,8 +1,9 @@ +#pragma lib "crypt" -// extern int pipe(int fildes[2]); +#include function \pipe(array &$fds = null) : int { - return to_int(pipe); - let fildes = calloc(2, psi\SIZEOF_INT); + return pipe(fildes) as to_int(pipe); + let fildes = calloc(2, sizeof(int)); set $fds = to_array(*fildes, 2, to_int(*fildes)); }