|
@ -56,7 +56,7 @@ STATIC bool repl_display_debugging_info = 0; |
|
|
|
|
|
|
|
|
// parses, compiles and executes the code in the lexer
|
|
|
// parses, compiles and executes the code in the lexer
|
|
|
// frees the lexer before returning
|
|
|
// frees the lexer before returning
|
|
|
bool parse_compile_execute(mp_lexer_t *lex, mp_parse_input_kind_t input_kind, bool is_repl) { |
|
|
int parse_compile_execute(mp_lexer_t *lex, mp_parse_input_kind_t input_kind, bool is_repl) { |
|
|
mp_parse_error_kind_t parse_error_kind; |
|
|
mp_parse_error_kind_t parse_error_kind; |
|
|
mp_parse_node_t pn = mp_parse(lex, input_kind, &parse_error_kind); |
|
|
mp_parse_node_t pn = mp_parse(lex, input_kind, &parse_error_kind); |
|
|
qstr source_name = mp_lexer_source_name(lex); |
|
|
qstr source_name = mp_lexer_source_name(lex); |
|
@ -65,7 +65,7 @@ bool parse_compile_execute(mp_lexer_t *lex, mp_parse_input_kind_t input_kind, bo |
|
|
// parse error
|
|
|
// parse error
|
|
|
mp_parse_show_exception(lex, parse_error_kind); |
|
|
mp_parse_show_exception(lex, parse_error_kind); |
|
|
mp_lexer_free(lex); |
|
|
mp_lexer_free(lex); |
|
|
return false; |
|
|
return 0; |
|
|
} |
|
|
} |
|
|
|
|
|
|
|
|
mp_lexer_free(lex); |
|
|
mp_lexer_free(lex); |
|
@ -74,24 +74,35 @@ bool parse_compile_execute(mp_lexer_t *lex, mp_parse_input_kind_t input_kind, bo |
|
|
|
|
|
|
|
|
if (mp_obj_is_exception_instance(module_fun)) { |
|
|
if (mp_obj_is_exception_instance(module_fun)) { |
|
|
mp_obj_print_exception(module_fun); |
|
|
mp_obj_print_exception(module_fun); |
|
|
return false; |
|
|
return 0; |
|
|
} |
|
|
} |
|
|
|
|
|
|
|
|
nlr_buf_t nlr; |
|
|
nlr_buf_t nlr; |
|
|
bool ret; |
|
|
int ret; |
|
|
uint32_t start = HAL_GetTick(); |
|
|
uint32_t start = HAL_GetTick(); |
|
|
if (nlr_push(&nlr) == 0) { |
|
|
if (nlr_push(&nlr) == 0) { |
|
|
usb_vcp_set_interrupt_char(VCP_CHAR_CTRL_C); // allow ctrl-C to interrupt us
|
|
|
usb_vcp_set_interrupt_char(VCP_CHAR_CTRL_C); // allow ctrl-C to interrupt us
|
|
|
mp_call_function_0(module_fun); |
|
|
mp_call_function_0(module_fun); |
|
|
usb_vcp_set_interrupt_char(VCP_CHAR_NONE); // disable interrupt
|
|
|
usb_vcp_set_interrupt_char(VCP_CHAR_NONE); // disable interrupt
|
|
|
nlr_pop(); |
|
|
nlr_pop(); |
|
|
ret = true; |
|
|
ret = 1; |
|
|
} else { |
|
|
} else { |
|
|
// uncaught exception
|
|
|
// uncaught exception
|
|
|
// FIXME it could be that an interrupt happens just before we disable it here
|
|
|
// FIXME it could be that an interrupt happens just before we disable it here
|
|
|
usb_vcp_set_interrupt_char(VCP_CHAR_NONE); // disable interrupt
|
|
|
usb_vcp_set_interrupt_char(VCP_CHAR_NONE); // disable interrupt
|
|
|
|
|
|
// check for SystemExit
|
|
|
|
|
|
mp_obj_t exc = (mp_obj_t)nlr.ret_val; |
|
|
|
|
|
if (mp_obj_is_subclass_fast(mp_obj_get_type(exc), &mp_type_SystemExit)) { |
|
|
|
|
|
// None is an exit value of 0; an int is its value; anything else is 1
|
|
|
|
|
|
mp_obj_t exit_val = mp_obj_exception_get_value(exc); |
|
|
|
|
|
mp_int_t val = 0; |
|
|
|
|
|
if (exit_val != mp_const_none && !mp_obj_get_int_maybe(exit_val, &val)) { |
|
|
|
|
|
val = 1; |
|
|
|
|
|
} |
|
|
|
|
|
return PYEXEC_FORCED_EXIT | (val & 255); |
|
|
|
|
|
} |
|
|
mp_obj_print_exception((mp_obj_t)nlr.ret_val); |
|
|
mp_obj_print_exception((mp_obj_t)nlr.ret_val); |
|
|
ret = false; |
|
|
ret = 0; |
|
|
} |
|
|
} |
|
|
|
|
|
|
|
|
// display debugging info if wanted
|
|
|
// display debugging info if wanted
|
|
@ -160,14 +171,17 @@ raw_repl_reset: |
|
|
// exit for a soft reset
|
|
|
// exit for a soft reset
|
|
|
stdout_tx_str("\r\n"); |
|
|
stdout_tx_str("\r\n"); |
|
|
vstr_clear(&line); |
|
|
vstr_clear(&line); |
|
|
return 1; |
|
|
return PYEXEC_FORCED_EXIT; |
|
|
} |
|
|
} |
|
|
|
|
|
|
|
|
mp_lexer_t *lex = mp_lexer_new_from_str_len(MP_QSTR__lt_stdin_gt_, line.buf, line.len, 0); |
|
|
mp_lexer_t *lex = mp_lexer_new_from_str_len(MP_QSTR__lt_stdin_gt_, line.buf, line.len, 0); |
|
|
if (lex == NULL) { |
|
|
if (lex == NULL) { |
|
|
printf("MemoryError\n"); |
|
|
printf("MemoryError\n"); |
|
|
} else { |
|
|
} else { |
|
|
parse_compile_execute(lex, MP_PARSE_FILE_INPUT, false); |
|
|
int ret = parse_compile_execute(lex, MP_PARSE_FILE_INPUT, false); |
|
|
|
|
|
if (ret & PYEXEC_FORCED_EXIT) { |
|
|
|
|
|
return ret; |
|
|
|
|
|
} |
|
|
} |
|
|
} |
|
|
|
|
|
|
|
|
// indicate end of output with EOF character
|
|
|
// indicate end of output with EOF character
|
|
@ -229,7 +243,7 @@ friendly_repl_reset: |
|
|
// exit for a soft reset
|
|
|
// exit for a soft reset
|
|
|
stdout_tx_str("\r\n"); |
|
|
stdout_tx_str("\r\n"); |
|
|
vstr_clear(&line); |
|
|
vstr_clear(&line); |
|
|
return 1; |
|
|
return PYEXEC_FORCED_EXIT; |
|
|
} else if (vstr_len(&line) == 0) { |
|
|
} else if (vstr_len(&line) == 0) { |
|
|
continue; |
|
|
continue; |
|
|
} |
|
|
} |
|
@ -247,7 +261,10 @@ friendly_repl_reset: |
|
|
if (lex == NULL) { |
|
|
if (lex == NULL) { |
|
|
printf("MemoryError\n"); |
|
|
printf("MemoryError\n"); |
|
|
} else { |
|
|
} else { |
|
|
parse_compile_execute(lex, MP_PARSE_SINGLE_INPUT, true); |
|
|
int ret = parse_compile_execute(lex, MP_PARSE_SINGLE_INPUT, true); |
|
|
|
|
|
if (ret & PYEXEC_FORCED_EXIT) { |
|
|
|
|
|
return ret; |
|
|
|
|
|
} |
|
|
} |
|
|
} |
|
|
} |
|
|
} |
|
|
} |
|
|
} |
|
|