X-Git-Url: https://git.m6w6.name/?p=m6w6%2Fext-psi;a=blobdiff_plain;f=psi.d%2Fglob.psi;h=4e5589a579fa5b1470e7b074f4b2de62a1986663;hp=f4a762a729e1a0bfbac6e1877954d12abf449486;hb=698841dfdd4d70d24e0b7af25ac7100bc2cb26a4;hpb=9bcb1df0786a8193d65949c857baaba2f4296e84 diff --git a/psi.d/glob.psi b/psi.d/glob.psi index f4a762a..4e5589a 100644 --- a/psi.d/glob.psi +++ b/psi.d/glob.psi @@ -1,7 +1,12 @@ +#include + function psi\glob(string $pattern, int $flags, array &$glob = NULL, callable $errfn = NULL) : int { let path = strval($pattern); let flags = intval($flags); - let err = callback intval($errfn( + let err = callback( + epath, + eerrno + ) as intval($errfn( to_string(epath), to_int(eerrno) )); @@ -14,7 +19,7 @@ function psi\glob(string $pattern, int $flags, array &$glob = NULL, callable $er strval($gl_pathv) ) ); - return to_int(glob); + return glob(path, flags, err, buf) as to_int(glob); set $glob = to_array(*buf, to_int(gl_matchc), to_int(gl_pathc),