parser: accept trailing comma in enums; __restrict for arrays

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

diff --git a/psi.d/uname.psi b/psi.d/uname.psi
index 6c6a6b0f914ec142dd6acd7f7e7bc66de0fbd2d3..e5144da51026da4715322410c71a76c1c4ee4ec1 100644 (file)
--- a/psi.d/uname.psi
+++ b/psi.d/uname.psi
@@ -1,6 +1,8 @@
+#include <sys/utsname.h>
+
 function psi\uname(array &$u = NULL) : int {
        let name = calloc(1, psi\SIZEOF_STRUCT_UTSNAME);
-       return to_int(uname);
+       return uname(name) as to_int(uname);
        set $u = to_array(*name,
                to_string(sysname),
                to_string(nodename),
@@ -8,4 +10,4 @@ function psi\uname(array &$u = NULL) : int {
                to_string(version), 
                to_string(machine),
                to_string(domainname));
-}
\ No newline at end of file
+}