X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=src%2Fstm32f4-disco%2Fao_disco.c;h=47948a6525e7f4ee9998301adcd4b0fd413a87ce;hb=e959061fa17e15dfdd75d35c6c67e68a0e5e98e2;hp=ede7c05f3b6e53a99cc508dcc13146741edd92e6;hpb=32463323d888d2b36d4b993d82e2522e1b236299;p=fw%2Faltos diff --git a/src/stm32f4-disco/ao_disco.c b/src/stm32f4-disco/ao_disco.c index ede7c05f..47948a65 100644 --- a/src/stm32f4-disco/ao_disco.c +++ b/src/stm32f4-disco/ao_disco.c @@ -13,41 +13,17 @@ */ #include -#include - -static void scheme_cmd() { - ao_scheme_read_eval_print(stdin, stdout, false); -} - -static const struct ao_cmds scheme_cmds[] = { - { scheme_cmd, "l\0Run scheme interpreter" }, - { 0, 0 } -}; - -int -_ao_scheme_getc(void) -{ - static uint8_t at_eol; - int c; - - if (at_eol) { - ao_cmd_readline(ao_scheme_read_list ? "- " : "> "); - at_eol = 0; - } - c = (unsigned char) ao_cmd_lex(); - if (c == '\n') - at_eol = 1; - return c; -} +#include void main(void) { ao_clock_init(); ao_timer_init(); + ao_task_init(); + ao_led_init(); ao_usart_init(); - ao_task_init(); + ao_usb_init(); ao_cmd_init(); - ao_cmd_register(scheme_cmds); ao_start_scheduler(); }