mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2025-10-30 23:23:07 +00:00
Code Issues 1 Releases Wiki Activity

Add more values for (os/which)

Browse Source 
Some bsd flavors.
This commit is contained in:
Calvin Rose
2019-07-27 11:29:40 -05:00
parent b0b1024f8a
commit 3c133bd677
2 changed files with 15 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
src/core/os.c
View File

@@ -75,6 +75,12 @@ static Janet os_which(int32_t argc, Janet *argv) {
return janet_ckeywordv("web");
#elif defined(__linux__)
return janet_ckeywordv("linux");
#elif define(__FreeBSD__)
return janet_ckeywordv("freebsd");
#elif define(__NetBSD__)
return janet_ckeywordv("netbsd");
#elif define(__OpenBSD__)
return janet_ckeywordv("openbsd");
#else
return janet_ckeywordv("posix");
#endif
@@ -763,10 +769,13 @@ static const JanetReg os_cfuns[] = {
"os/which", os_which,
JDOC("(os/which)\n\n"
"Check the current operating system. Returns one of:\n\n"
"\t:windows - Microsoft Windows\n"
"\t:macos - Apple macos\n"
"\t:windows\n"
"\t:macos\n"
"\t:web - Web assembly (emscripten)\n"
"\t:linux - Linux\n"
"\t:linux\n"
"\t:freebsd\n"
"\t:openbsd\n"
"\t:netbsd\n"
"\t:posix - A POSIX compatible system (default)")
},
{