raising the head after a three-weeks refactoring
[m6w6/ext-psi] / psi.d / glob.psi
index 19aa6cb951b02676eda1b74c3ba3ec99bec9c810..f4a762a729e1a0bfbac6e1877954d12abf449486 100644 (file)
@@ -5,14 +5,22 @@ function psi\glob(string $pattern, int $flags, array &$glob = NULL, callable $er
                to_string(epath),
                to_int(eerrno)
        ));
-       let buf = &arrval($glob);
+       let buf = &arrval($glob,
+               intval($gl_matchc),
+               intval($gl_pathc),
+               intval($gl_offs),
+               intval($gl_flags),
+               &arrval($gl_pathv, 
+                       strval($gl_pathv)
+               )
+       );
        return to_int(glob);
        set $glob = to_array(*buf,
                to_int(gl_matchc),
                to_int(gl_pathc),
                to_int(gl_offs),
                to_int(gl_flags),
-               to_array(gl_pathv, gl_pathc + gl_offs, to_string(gl_pathv))
+               to_array(*gl_pathv, gl_pathc + gl_offs, to_string(*gl_pathv))
        );
        free globfree(buf);
 }