X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=src%2Fcortexelf-v1%2Fao_cortexelf.c;h=5ed78bf09c65865041ef80a530403efd9e331d5e;hb=6023ff81f1bbd240169b9548209133d3b02d475f;hp=77fbd0c0e44b2b108919d0aae2687c505f666544;hpb=17ec1c510ccc42bbc387940b5805f452697f78d6;p=fw%2Faltos diff --git a/src/cortexelf-v1/ao_cortexelf.c b/src/cortexelf-v1/ao_cortexelf.c index 77fbd0c0..5ed78bf0 100644 --- a/src/cortexelf-v1/ao_cortexelf.c +++ b/src/cortexelf-v1/ao_cortexelf.c @@ -27,10 +27,12 @@ #include #include #include -#include +#include #include #include #include +#include +#include struct ao_task ball_task; @@ -186,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 @@ -222,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 } }; @@ -273,6 +275,10 @@ main(void) ao_button_init(); ao_as1107_init(); + ao_matrix_init(); + ao_1802_init(); + + ao_hex_init(); ao_config_init();