Fcalva/cyclone
1
0
Fork 0
mirror of https://github.com/justinethier/cyclone.git synced 2025-07-14 16:27:35 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Possible global var for cmd line args

Browse source
This commit is contained in:
Justin Ethier 2015-06-29 22:59:37 -04:00
parent 8f32841878
commit a9e9a1f90b
2 changed files with 2 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
runtime.c
View file

@ -51,6 +51,7 @@ int gc_num_ans;
jmp_buf jmp_main; /* Where to jump to. */ jmp_buf jmp_main; /* Where to jump to. */
object Cyc_global_variables = nil; object Cyc_global_variables = nil;
object Cyc_command_line_arguments = nil;
static symbol_type __EOF = {eof_tag, "", nil}; // symbol_type in lieu of custom type static symbol_type __EOF = {eof_tag, "", nil}; // symbol_type in lieu of custom type
const object Cyc_EOF = &__EOF; const object Cyc_EOF = &__EOF;

1
runtime.h
View file

@ -56,6 +56,7 @@ object cell_get(object cell);
/* Prototypes for Lisp built-in functions. */ /* Prototypes for Lisp built-in functions. */
extern object Cyc_global_variables; extern object Cyc_global_variables;
extern object Cyc_command_line_arguments;
object Cyc_get_global_variables(); object Cyc_get_global_variables();
object Cyc_get_cvar(object var); object Cyc_get_cvar(object var);
object Cyc_set_cvar(object var, object value); object Cyc_set_cvar(object var, object value);