From 369b6f3c7768c248a9395e59cdb54acdc97f4b52 Mon Sep 17 00:00:00 2001 From: Justin Ethier Date: Tue, 27 Nov 2018 10:32:18 -0500 Subject: [PATCH] More static functions --- include/cyclone/runtime.h | 3 --- runtime.c | 6 +++--- 2 files changed, 3 insertions(+), 6 deletions(-) diff --git a/include/cyclone/runtime.h b/include/cyclone/runtime.h index 96b74023..2671cd68 100644 --- a/include/cyclone/runtime.h +++ b/include/cyclone/runtime.h @@ -719,10 +719,7 @@ void Cyc_rt_raise_msg(void *data, const char *err); */ /**@{*/ object add_symbol(symbol_type * psym); -object add_symbol_by_name(const char *name); -object find_symbol_by_name(const char *name); object find_or_add_symbol(const char *name); -char *_strdup(const char *s); /**@}*/ /** diff --git a/runtime.c b/runtime.c index 3784ad9c..11df13d6 100644 --- a/runtime.c +++ b/runtime.c @@ -368,7 +368,7 @@ void Cyc_st_print(void *data, FILE * out) For now, GC of symbols is missing. long-term it probably would be desirable */ -char *_strdup(const char *s) +static char *_strdup(const char *s) { char *d = malloc(strlen(s) + 1); if (d) { @@ -377,7 +377,7 @@ char *_strdup(const char *s) return d; } -object find_symbol_by_name(const char *name) +static object find_symbol_by_name(const char *name) { symbol_type tmp = { {0}, symbol_tag, name}; object result = set_get(&symbol_table, &tmp); @@ -396,7 +396,7 @@ object add_symbol(symbol_type * psym) return psym; } -object add_symbol_by_name(const char *name) +static object add_symbol_by_name(const char *name) { symbol_type sym = { {0}, symbol_tag, _strdup(name)}; symbol_type *psym = malloc(sizeof(symbol_type));