From a9e9a1f90b9c2423946ca5997a0be8a077b0912d Mon Sep 17 00:00:00 2001 From: Justin Ethier Date: Mon, 29 Jun 2015 22:59:37 -0400 Subject: [PATCH] Possible global var for cmd line args --- runtime.c | 1 + runtime.h | 1 + 2 files changed, 2 insertions(+) diff --git a/runtime.c b/runtime.c index c0d0e69d..7d665df4 100644 --- a/runtime.c +++ b/runtime.c @@ -51,6 +51,7 @@ int gc_num_ans; jmp_buf jmp_main; /* Where to jump to. */ 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 const object Cyc_EOF = &__EOF; diff --git a/runtime.h b/runtime.h index 688d6acc..19fd15a5 100644 --- a/runtime.h +++ b/runtime.h @@ -56,6 +56,7 @@ object cell_get(object cell); /* Prototypes for Lisp built-in functions. */ extern object Cyc_global_variables; +extern object Cyc_command_line_arguments; object Cyc_get_global_variables(); object Cyc_get_cvar(object var); object Cyc_set_cvar(object var, object value);