mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2025-10-31 15:43:01 +00:00
Code Issues 1 Releases Wiki Activity

Windows bump.

Browse Source
This commit is contained in:
Calvin Rose
2019-03-30 13:05:07 -04:00
parent 970923d0e5
commit 8af28d3fa5
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/core/os.c
View File

@@ -395,8 +395,8 @@ static const uint8_t *janet_decode_permissions(unsigned short m) {
static const uint8_t *janet_decode_mode(unsigned short m) {
const char *str = "other";
if (_S_ISREG(m)) str = "file";
else if (_S_ISDIR(m)) str = "directory";
if (S_ISREG(m)) str = "file";
else if (S_ISDIR(m)) str = "directory";
return janet_ckeyword(str);
}
#else
@@ -480,7 +480,7 @@ static Janet os_dir(int32_t argc, Janet *argv) {
intptr_t res = _findfirst(pattern, &afile);
while (res != -1) {
janet_array_push(paths, janet_cstringv(afile.name));
res = _findnext(pattern, &afile);
res = _findnext(res, &afile);
}
_findclose(res);
#else