summaryrefslogtreecommitdiff
path: root/src/lisp/ao_lisp_poly.c
diff options
context:
space:
mode:
authorKeith Packard <keithp@keithp.com>2017-11-18 20:38:15 -0800
committerKeith Packard <keithp@keithp.com>2017-11-18 20:49:52 -0800
commit5f8f0ed5cd5d4b4f793c602ed09f9b4bdb98f7e8 (patch)
treede2468ca80a3411735517ee39155d1cf30055ceb /src/lisp/ao_lisp_poly.c
parente745229311366a792110d78d8480a2bf83eef9a0 (diff)
altos/lisp: Add 'big' ints -- 24 bits wide
With the default ints being only 14 bits, having a larger type with more precision seems useful. This is not exposed to the application. Signed-off-by: Keith Packard <keithp@keithp.com>
Diffstat (limited to 'src/lisp/ao_lisp_poly.c')
-rw-r--r--src/lisp/ao_lisp_poly.c4
1 files changed, 4 insertions, 0 deletions
diff --git a/src/lisp/ao_lisp_poly.c b/src/lisp/ao_lisp_poly.c
index 7e4c98d2..94ecd042 100644
--- a/src/lisp/ao_lisp_poly.c
+++ b/src/lisp/ao_lisp_poly.c
@@ -56,6 +56,10 @@ static const struct ao_lisp_funcs ao_lisp_funcs[AO_LISP_NUM_TYPE] = {
.write = ao_lisp_bool_write,
.display = ao_lisp_bool_write,
},
+ [AO_LISP_BIGINT] = {
+ .write = ao_lisp_bigint_write,
+ .display = ao_lisp_bigint_write,
+ },
};
static const struct ao_lisp_funcs *