summaryrefslogtreecommitdiff
path: root/src/nucleao-32/ao_nucleo.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/nucleao-32/ao_nucleo.c')
-rw-r--r--src/nucleao-32/ao_nucleo.c7
1 files changed, 7 insertions, 0 deletions
diff --git a/src/nucleao-32/ao_nucleo.c b/src/nucleao-32/ao_nucleo.c
index cda889c6..113e2399 100644
--- a/src/nucleao-32/ao_nucleo.c
+++ b/src/nucleao-32/ao_nucleo.c
@@ -13,6 +13,7 @@
*/
#include <ao.h>
+#include <ao_lisp.h>
static uint16_t blink_delay, blink_running;
@@ -41,11 +42,17 @@ static void blink_cmd() {
ao_sleep(&blink_running);
}
+static void lisp_cmd() {
+ ao_lisp_read_eval_print();
+}
+
static const struct ao_cmds blink_cmds[] = {
{ blink_cmd, "b <delay, 0 off>\0Blink the green LED" },
+ { lisp_cmd, "l\0Run lisp interpreter" },
{ 0, 0 }
};
+
void main(void)
{
ao_led_init(LEDS_AVAILABLE);