X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=src%2Flisp%2Fao_lisp_poly.c;fp=src%2Flisp%2Fao_lisp_poly.c;h=e93e1192ed1636a53f5fd67bc65aca1d551101ef;hb=6d2f271a45759bd792d299f04a424d3382ef4798;hp=94ecd042551014cf13c5e9c2ff9db7174d82ad56;hpb=12a1f6ad48f2b924f71239effeb90afca75a090f;p=fw%2Faltos

diff --git a/src/lisp/ao_lisp_poly.c b/src/lisp/ao_lisp_poly.c
index 94ecd042..e93e1192 100644
--- a/src/lisp/ao_lisp_poly.c
+++ b/src/lisp/ao_lisp_poly.c
@@ -60,6 +60,10 @@ static const struct ao_lisp_funcs ao_lisp_funcs[AO_LISP_NUM_TYPE] = {
 		.write = ao_lisp_bigint_write,
 		.display = ao_lisp_bigint_write,
 	},
+	[AO_LISP_FLOAT] = {
+		.write = ao_lisp_float_write,
+		.display = ao_lisp_float_write,
+	},
 };
 
 static const struct ao_lisp_funcs *