mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2025-11-09 20:13:02 +00:00
Code Issues 1 Releases Wiki Activity

Allow marshaling of more functions for core.

Browse Source 
Fix indentation in some files.
This commit is contained in:
Calvin Rose
2018-08-22 21:41:25 -04:00
parent 50aefc8865
commit 510feeed7f
14 changed files with 234 additions and 193 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
src/core/io.c
View File

@@ -370,21 +370,26 @@ static const DstReg cfuns[] = {
{NULL, NULL}
};
static void addf(DstTable *env, const char *name, Dst val) {
dst_env_def(env, name, val);
dst_register(name, val);
}
/* Module entry point */
int dst_lib_io(DstArgs args) {
DstTable *env = dst_env_arg(args);
dst_env_cfuns(env, cfuns);
/* stdout */
dst_env_def(env, "stdout",
addf(env, "stdout",
makef(stdout, IO_APPEND | IO_NOT_CLOSEABLE | IO_SERIALIZABLE));
/* stderr */
dst_env_def(env, "stderr",
addf(env, "stderr",
makef(stderr, IO_APPEND | IO_NOT_CLOSEABLE | IO_SERIALIZABLE));
/* stdin */
dst_env_def(env, "stdin",
addf(env, "stdin",
makef(stdin, IO_READ | IO_NOT_CLOSEABLE | IO_SERIALIZABLE));
return 0;