-static void lisp_cmd() {
- ao_lisp_read_eval_print();
-}
-
-static void beep() {
- ao_beep_for(AO_BEEP_MID, AO_MS_TO_TICKS(200));
-}
-
-static const struct ao_cmds blink_cmds[] = {
- { lisp_cmd, "l\0Run lisp interpreter" },
- { beep, "b\0Beep" },
- { 0, 0 }
-};