altos/lisp: Finish first pass through r7rs

[fw/altos] / src / lisp / ao_lisp_make_builtin

diff --git a/src/lisp/ao_lisp_make_builtin b/src/lisp/ao_lisp_make_builtin
index 11838e33aebc160444d8f73e63173dd578b35c10..531e388d8627d165826d8f4cae08ed2c6aca4f88 100644 (file)
--- a/src/lisp/ao_lisp_make_builtin
+++ b/src/lisp/ao_lisp_make_builtin
@@ -137,7 +137,9 @@ dump_consts(builtin_t[*] builtins) {
        for (int i = 0; i < dim(builtins); i++) {
                for (int j = 0; j < dim(builtins[i].lisp_names); j++) {
                        printf ("\t{ .name = \"%s\", .args = AO_LISP_FUNC_%s, .func = builtin_%s },\n",
-                               builtins[i].lisp_names[j], builtins[i].type, builtins[i].c_name);
+                               builtins[i].lisp_names[j],
+                               builtins[i].type,
+                               builtins[i].c_name);
                }
        }
        printf("};\n");