From d8c9024f3829dc3f241b16869f165f3ee01764f3 Mon Sep 17 00:00:00 2001 From: Keith Packard Date: Tue, 12 Dec 2017 15:25:51 -0800 Subject: altos/scheme: Support scheme subsetting via feature settings This provides for the creation of smaller versions of the interpreter, leaving out options like floating point numbers and vectors. Signed-off-by: Keith Packard --- src/scheme/ao_scheme_int.c | 3 +++ 1 file changed, 3 insertions(+) (limited to 'src/scheme/ao_scheme_int.c') diff --git a/src/scheme/ao_scheme_int.c b/src/scheme/ao_scheme_int.c index 350a5d35..43d6b8e1 100644 --- a/src/scheme/ao_scheme_int.c +++ b/src/scheme/ao_scheme_int.c @@ -21,6 +21,8 @@ ao_scheme_int_write(ao_poly p) printf("%d", i); } +#ifdef AO_SCHEME_FEATURE_BIGINT + int32_t ao_scheme_poly_integer(ao_poly p) { @@ -77,3 +79,4 @@ ao_scheme_bigint_write(ao_poly p) printf("%d", ao_scheme_bigint_int(bi->value)); } +#endif /* AO_SCHEME_FEATURE_BIGINT */ -- cgit v1.2.3