+#include <sys/utsname.h>
+
function psi\uname(array &$u = NULL) : int {
- let name = calloc(1, struct utsname);
- return to_int(uname);
+ 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(version),
to_string(machine),
to_string(domainname));
-}
\ No newline at end of file
+}