Fixed problem in loader

This commit is contained in:
Benjamin Vedder 2022-01-18 10:45:38 +01:00
parent d80890b25b
commit b144b579bd
2 changed files with 7 additions and 2 deletions

View File

@ -90,10 +90,14 @@ static void terminal_start(int argc, const char **argv) {
lispif_load_vesc_extensions();
commands_printf("Parsing %d characters", strlen(code));
VALUE t = tokpar_parse(code);
if (dec_sym(t) == SYM_STACK_ERROR) {
commands_printf("Lisp parser ran out of stack");
} else if (dec_sym(t) == SYM_RERROR) {
commands_printf("Lisp parser error");
} else {
eval_cps_program(t);
eval_cps_continue_eval();

View File

@ -51,9 +51,9 @@ Item {
// mLogReader.openLogFile("example_control_servo_from_duty.lisp")
// mLogReader.openLogFile("example_print_bms_data.lisp")
// mLogReader.openLogFile("example_can_pos_follow.lisp")
mLogReader.openLogFile("example_speed_test.lisp")
// mLogReader.openLogFile("example_speed_test.lisp")
// mLogReader.openLogFile("test_math.lisp")
mLogReader.openLogFile("test_math.lisp")
mCommands.qmlUiErase()
if (Utility.waitSignal(mCommands, "2eraseQmluiResReceived(bool)", 4000)) {
@ -68,6 +68,7 @@ Item {
text += line
mCommands.qmlUiWrite(line, offset)
Utility.waitSignal(mCommands, "2writeQmluiResReceived(bool,quint32)", 4000)
offset += line.length