Squashed 'lispBM/lispBM/' changes from b436f573..6fc68bd8

6fc68bd8 Clear extension counter on init
869ff5c7 tweak error response in reader upon memory error while loading ext- symbol

git-subtree-dir: lispBM/lispBM
git-subtree-split: 6fc68bd84b166f3a7b867cdde27cba8e54550989
This commit is contained in:
Benjamin Vedder 2024-01-11 08:53:26 +01:00
parent 3af0ba58f6
commit 01ac9ef141
2 changed files with 3 additions and 0 deletions

View File

@ -3571,6 +3571,8 @@ static void cont_read_next_token(eval_context_t *ctx) {
error_ctx(ENC_SYM_FATAL_ERROR);
}
symbol_id = ext_id + EXTENSION_SYMBOLS_START;
} else {
error_ctx(ENC_SYM_MERROR);
}
} else {
if (ctx->flags & EVAL_CPS_CONTEXT_FLAG_CONST_SYMBOL_STRINGS &&

View File

@ -48,6 +48,7 @@ int lbm_extensions_init(lbm_extension_t *extension_storage, lbm_uint extension_s
extension_storage[i].fptr = lbm_extensions_default;
}
ext_num = 0;
next_extension_ix = 0;
ext_max = (lbm_uint)extension_storage_size;