From ca27d467198c556be483961a6ca3b8f97bbe96a6 Mon Sep 17 00:00:00 2001 From: Keith Packard Date: Tue, 12 Dec 2017 17:59:26 -0800 Subject: altos/scheme: More compiler warning cleanups Make local funcs static. Don't mix decls and code.x Signed-off-by: Keith Packard --- src/scheme/ao_scheme_lambda.c | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'src/scheme/ao_scheme_lambda.c') diff --git a/src/scheme/ao_scheme_lambda.c b/src/scheme/ao_scheme_lambda.c index ec6f858c..be87f4d1 100644 --- a/src/scheme/ao_scheme_lambda.c +++ b/src/scheme/ao_scheme_lambda.c @@ -17,14 +17,14 @@ #include "ao_scheme.h" -int +static int lambda_size(void *addr) { (void) addr; return sizeof (struct ao_scheme_lambda); } -void +static void lambda_mark(void *addr) { struct ao_scheme_lambda *lambda = addr; @@ -33,7 +33,7 @@ lambda_mark(void *addr) ao_scheme_poly_mark(lambda->frame, 0); } -void +static void lambda_move(void *addr) { struct ao_scheme_lambda *lambda = addr; @@ -65,7 +65,7 @@ ao_scheme_lambda_write(ao_poly poly) printf(")"); } -ao_poly +static ao_poly ao_scheme_lambda_alloc(struct ao_scheme_cons *code, int args) { struct ao_scheme_lambda *lambda; -- cgit v1.2.3