X-Git-Url: https://git.m6w6.name/?p=m6w6%2Fext-psi;a=blobdiff_plain;f=tests%2Fpipe%2Fpipe.psi;h=aab776d379bfe7884026d7ab386dd03e2d5f03a4;hp=6fc9e89aee5b2f64760aa7b9e1781f1d07026129;hb=4bf8ff5e477da2fa4f82518bb947055c2c0374d6;hpb=d3171526ab7658114cac4ebe1098af4b038e576e

diff --git a/tests/pipe/pipe.psi b/tests/pipe/pipe.psi
index 6fc9e89..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 <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));
 }