mirror of
https://github.com/vim/vim.git
synced 2025-09-23 03:43:49 -04:00
patch 8.2.3361: Vim9: crash with nested :while
Problem: Vim9: crash with nested :while. Solution: Handle skipping better. (Naruhiko Nishino, closes #8778)
This commit is contained in:
@@ -4469,8 +4469,6 @@ compile_subscript(
|
||||
// dict member: dict[key]
|
||||
// string index: text[123]
|
||||
// blob index: blob[123]
|
||||
// TODO: more arguments
|
||||
// TODO: recognize list or dict at runtime
|
||||
if (generate_ppconst(cctx, ppconst) == FAIL)
|
||||
return FAIL;
|
||||
ppconst->pp_is_const = FALSE;
|
||||
@@ -8267,22 +8265,26 @@ compile_while(char_u *arg, cctx_T *cctx)
|
||||
// compile "expr"
|
||||
if (compile_expr0(&p, cctx) == FAIL)
|
||||
return NULL;
|
||||
|
||||
if (!ends_excmd2(arg, skipwhite(p)))
|
||||
{
|
||||
semsg(_(e_trailing_arg), p);
|
||||
return NULL;
|
||||
}
|
||||
|
||||
if (bool_on_stack(cctx) == FAIL)
|
||||
return FAIL;
|
||||
if (cctx->ctx_skip != SKIP_YES)
|
||||
{
|
||||
if (bool_on_stack(cctx) == FAIL)
|
||||
return FAIL;
|
||||
|
||||
// CMDMOD_REV must come before the jump
|
||||
generate_undo_cmdmods(cctx);
|
||||
// CMDMOD_REV must come before the jump
|
||||
generate_undo_cmdmods(cctx);
|
||||
|
||||
// "while_end" is set when ":endwhile" is found
|
||||
if (compile_jump_to_end(&scope->se_u.se_while.ws_end_label,
|
||||
// "while_end" is set when ":endwhile" is found
|
||||
if (compile_jump_to_end(&scope->se_u.se_while.ws_end_label,
|
||||
JUMP_IF_FALSE, cctx) == FAIL)
|
||||
return FAIL;
|
||||
return FAIL;
|
||||
}
|
||||
|
||||
return p;
|
||||
}
|
||||
@@ -8304,20 +8306,23 @@ compile_endwhile(char_u *arg, cctx_T *cctx)
|
||||
return NULL;
|
||||
}
|
||||
cctx->ctx_scope = scope->se_outer;
|
||||
unwind_locals(cctx, scope->se_local_count);
|
||||
if (cctx->ctx_skip != SKIP_YES)
|
||||
{
|
||||
unwind_locals(cctx, scope->se_local_count);
|
||||
|
||||
#ifdef FEAT_PROFILE
|
||||
// count the endwhile before jumping
|
||||
may_generate_prof_end(cctx, cctx->ctx_lnum);
|
||||
// count the endwhile before jumping
|
||||
may_generate_prof_end(cctx, cctx->ctx_lnum);
|
||||
#endif
|
||||
|
||||
// At end of ":for" scope jump back to the FOR instruction.
|
||||
generate_JUMP(cctx, JUMP_ALWAYS, scope->se_u.se_while.ws_top_label);
|
||||
// At end of ":for" scope jump back to the FOR instruction.
|
||||
generate_JUMP(cctx, JUMP_ALWAYS, scope->se_u.se_while.ws_top_label);
|
||||
|
||||
// Fill in the "end" label in the WHILE statement so it can jump here.
|
||||
// And in any jumps for ":break"
|
||||
compile_fill_jump_to_end(&scope->se_u.se_while.ws_end_label,
|
||||
// Fill in the "end" label in the WHILE statement so it can jump here.
|
||||
// And in any jumps for ":break"
|
||||
compile_fill_jump_to_end(&scope->se_u.se_while.ws_end_label,
|
||||
instr->ga_len, cctx);
|
||||
}
|
||||
|
||||
vim_free(scope);
|
||||
|
||||
|
Reference in New Issue
Block a user