X-Git-Url: https://git.m6w6.name/?p=m6w6%2Fext-psi;a=blobdiff_plain;f=psi.d%2Fglob.psi;h=61ada04bb65c7f0f41d9360c0ed8de1fff958d6c;hp=ce6f5a72c3510a2758c63e5533e3203b545952d3;hb=3fa287dfd76814b2ec54991c0208a019845a3dc0;hpb=cfebc76ed7426836f21296cca9a14b422bfa04cf diff --git a/psi.d/glob.psi b/psi.d/glob.psi index ce6f5a7..61ada04 100644 --- a/psi.d/glob.psi +++ b/psi.d/glob.psi @@ -1,8 +1,11 @@ -function psi\glob(string $pattern, int $flags, array &$glob = NULL) : int { +function psi\glob(string $pattern, int $flags, array &$glob = NULL, callable $errfn = NULL) : int { let path = strval($pattern); let flags = intval($flags); - let err = NULL; - let buf = arrval($glob); + let err = callback intval($errfn( + to_string(errmsg), + to_int(errno) + )); + let buf = &arrval($glob); return to_int(glob); set $glob = to_array(*buf, to_int(gl_matchc),