mirrors
/
janet
mirror of https://github.com/janet-lang/janet
1
0
Fork 0
Code Issues 1 Releases Wiki Activity

Mess with includes for os.c

This commit is contained in:
Calvin Rose 2019-03-28 23:34:24 -04:00
parent 871a58e1db
commit bf2d9ae634
1 changed files with 13 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
src/core/os.c
View File

@ -30,20 +30,23 @@
#ifndef JANET_REDUCED_OS
#include <time.h>
#include <fcntl.h>
#include <errno.h>
#include <stdio.h>
#include <string.h>
#include <sys/stat.h>
#ifdef JANET_WINDOWS
#include <Windows.h>
#include <windows.h>
#include <direct.h>
#include <sys/utime.h>
#include <io.h>
#else
#include <sys/stat.h>
#include <utime.h>
#include <unistd.h>
#include <dirent.h>
#include <fcntl.h>
#include <sys/types.h>
#include <sys/wait.h>
#include <stdio.h>
#include <errno.h>
#endif
/* For macos */
@ -52,7 +55,7 @@
#include <mach/mach.h>
#endif
#endif
#endif /* JANET_REDCUED_OS */
/* Core OS functions */
@ -354,7 +357,11 @@ static Janet os_mkdir(int32_t argc, Janet *argv) {
static Janet os_cd(int32_t argc, Janet *argv) {
janet_fixarity(argc, 1);
const char *path = janet_getcstring(argv, 0);
#ifdef JANET_WINDOWS
int res = _chdir(path);
#else
int res = chdir(path);
#endif
return janet_wrap_boolean(res != -1);
}