fix signature

[m6w6/ext-psi] / psi.d / uname.psi

diff --git a/psi.d/uname.psi b/psi.d/uname.psi
index 25abfcbbf48709f85b809e5de4fe945f9f39487f..ae0dd600fe87e0cc73046c3e42a2beaaa5977fdd 100644 (file)
--- a/psi.d/uname.psi
+++ b/psi.d/uname.psi
@@ -1,12 +1,11 @@
-extern int uname(struct utsname *u);
 function psi\uname(array &$u = NULL) : int {
-       let u = calloc(1, struct utsname);
-       return to_int(uname);
-       set $u = to_array(*u,
+       let name = calloc(1, psi\SIZEOF_STRUCT_UTSNAME);
+       return uname(name) as to_int(uname);
+       set $u = to_array(*name,
                to_string(sysname),
                to_string(nodename),
                to_string(release),
                to_string(version), 
                to_string(machine),
                to_string(domainname));
-}
\ No newline at end of file
+}