X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=src%2Flisp%2Fao_lisp_int.c;fp=src%2Flisp%2Fao_lisp_int.c;h=3b5341bd754bf557110b594171f5fec2d2668f34;hb=cf5729a0bae51172f12fc9ec4339d4e975a45fcc;hp=77f65e95ed2b189254f429cd1d8662da54227654;hpb=e1acf5eb12aceda7aa838df031c1da1129d0fa5d;p=fw%2Faltos

diff --git a/src/lisp/ao_lisp_int.c b/src/lisp/ao_lisp_int.c
index 77f65e95..3b5341bd 100644
--- a/src/lisp/ao_lisp_int.c
+++ b/src/lisp/ao_lisp_int.c
@@ -15,7 +15,7 @@
 #include "ao_lisp.h"
 
 void
-ao_lisp_int_print(ao_poly p)
+ao_lisp_int_write(ao_poly p)
 {
 	int i = ao_lisp_poly_int(p);
 	printf("%d", i);