X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=src%2Fcortexelf-v1%2Fao_cortexelf.c;h=5ed78bf09c65865041ef80a530403efd9e331d5e;hb=aeb07f2b94b0121d4e5a6ce175ce4e013d6557cf;hp=decd6ef57ad345a501f4e1cca4ea891c588cc52b;hpb=86d5119f19b5f3131d224982e011fd233b48aa22;p=fw%2Faltos diff --git a/src/cortexelf-v1/ao_cortexelf.c b/src/cortexelf-v1/ao_cortexelf.c index decd6ef5..5ed78bf0 100644 --- a/src/cortexelf-v1/ao_cortexelf.c +++ b/src/cortexelf-v1/ao_cortexelf.c @@ -27,7 +27,7 @@ #include #include #include -#include +#include #include #include #include @@ -188,8 +188,8 @@ ao_console_send(void) } } -static void lisp_cmd() { - ao_lisp_read_eval_print(); +static void scheme_cmd() { + ao_scheme_read_eval_print(); } static void @@ -224,7 +224,7 @@ __code struct ao_cmds ao_demo_cmds[] = { { ao_ps2_read_keys, "K\0Read keys from keyboard" }, { ao_console_send, "C\0Send data to console, end with ~" }, { ao_serial_blather, "S\0Blather on serial ports briefly" }, - { lisp_cmd, "l\0Run lisp interpreter" }, + { scheme_cmd, "l\0Run scheme interpreter" }, { led_cmd, "L start value\0Show value (byte) at digit start" }, { 0, NULL } }; @@ -275,7 +275,7 @@ main(void) ao_button_init(); ao_as1107_init(); - + ao_matrix_init(); ao_1802_init(); ao_hex_init();