-extern int uname(struct utsname *u);
+#include <sys/utsname.h>
+
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, 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
+}