From 788cace2cb783db0b4df6338f89e6b026ae23e9b Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Sat, 28 Nov 2009 04:15:19 -0800 Subject: Code cleanup. All private functions static. Private stuff in regex module not exposed in header. Etc. --- txr.c | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'txr.c') diff --git a/txr.c b/txr.c index e3c1c59e..83ef0233 100644 --- a/txr.c +++ b/txr.c @@ -53,14 +53,14 @@ val spec_file_str; * pool, which sets an OOM flag. Program can check flag * and gracefully terminate instead of aborting like this. */ -void *oom_realloc_handler(void *old, size_t size) +static void *oom_realloc_handler(void *old, size_t size) { format(std_error, lit("~a: out of memory\n"), prog_string, nao); put_line(std_error, lit("false")); abort(); } -void help(void) +static void help(void) { val text = lit( "\n" @@ -112,13 +112,13 @@ void help(void) format(std_output, text, auto_str(version), prog_string, nao); } -void hint(void) +static void hint(void) { format(std_error, lit("~a: incorrect arguments: try --help\n"), prog_string, nao); } -val remove_hash_bang_line(val spec) +static val remove_hash_bang_line(val spec) { if (!consp(spec)) return spec; -- cgit v1.2.3