summaryrefslogtreecommitdiffstats
path: root/src/evalbuffer.c
diff options
context:
space:
mode:
authorBram Moolenaar <Bram@vim.org>2021-12-28 11:24:49 +0000
committerBram Moolenaar <Bram@vim.org>2021-12-28 11:24:49 +0000
commit8b6256f6ec075cca40341e61ebc9f538b4902dd1 (patch)
treea59ebf29d7fe303e3bf2f985c89af994dfd5abc0 /src/evalbuffer.c
parentbe4e223eadaa765bf2957f196e4d4b6014057bd1 (diff)
patch 8.2.3919: Vim9: wrong argument for append() results in two errorsv8.2.3919
Problem: Vim9: wrong argument for append() results in two errors. Solution: Check did_emsg. Also for setline(). Adjust the help for appendbufline().
Diffstat (limited to 'src/evalbuffer.c')
-rw-r--r--src/evalbuffer.c27
1 files changed, 18 insertions, 9 deletions
diff --git a/src/evalbuffer.c b/src/evalbuffer.c
index 50d26c4b17..37febe4059 100644
--- a/src/evalbuffer.c
+++ b/src/evalbuffer.c
@@ -274,12 +274,14 @@ done:
f_append(typval_T *argvars, typval_T *rettv)
{
linenr_T lnum;
+ int did_emsg_before = did_emsg;
if (in_vim9script() && check_for_lnum_arg(argvars, 0) == FAIL)
return;
lnum = tv_get_lnum(&argvars[0]);
- set_buffer_lines(curbuf, lnum, TRUE, &argvars[1], rettv);
+ if (did_emsg == did_emsg_before)
+ set_buffer_lines(curbuf, lnum, TRUE, &argvars[1], rettv);
}
/*
@@ -290,6 +292,7 @@ buf_set_append_line(typval_T *argvars, typval_T *rettv, int append)
{
linenr_T lnum;
buf_T *buf;
+ int did_emsg_before = did_emsg;
if (in_vim9script()
&& (check_for_buffer_arg(argvars, 0) == FAIL
@@ -303,7 +306,8 @@ buf_set_append_line(typval_T *argvars, typval_T *rettv, int append)
else
{
lnum = tv_get_lnum_buf(&argvars[1], buf);
- set_buffer_lines(buf, lnum, append, &argvars[2], rettv);
+ if (did_emsg == did_emsg_before)
+ set_buffer_lines(buf, lnum, append, &argvars[2], rettv);
}
}
@@ -502,6 +506,9 @@ f_deletebufline(typval_T *argvars, typval_T *rettv)
win_T *curwin_save = NULL;
tabpage_T *tp;
win_T *wp;
+ int did_emsg_before = did_emsg;
+
+ rettv->vval.v_number = 1; // FAIL by default
if (in_vim9script()
&& (check_for_buffer_arg(argvars, 0) == FAIL
@@ -511,13 +518,12 @@ f_deletebufline(typval_T *argvars, typval_T *rettv)
buf = tv_get_buf(&argvars[0], FALSE);
if (buf == NULL)
- {
- rettv->vval.v_number = 1; // FAIL
return;
- }
is_curbuf = buf == curbuf;
first = tv_get_lnum_buf(&argvars[1], buf);
+ if (did_emsg > did_emsg_before)
+ return;
if (argvars[2].v_type != VAR_UNKNOWN)
last = tv_get_lnum_buf(&argvars[2], buf);
else
@@ -525,10 +531,7 @@ f_deletebufline(typval_T *argvars, typval_T *rettv)
if (buf->b_ml.ml_mfp == NULL || first < 1
|| first > buf->b_ml.ml_line_count || last < first)
- {
- rettv->vval.v_number = 1; // FAIL
return;
- }
if (!is_curbuf)
{
@@ -577,6 +580,7 @@ f_deletebufline(typval_T *argvars, typval_T *rettv)
curbuf = curbuf_save;
curwin = curwin_save;
}
+ rettv->vval.v_number = 0; // OK
}
/*
@@ -780,6 +784,7 @@ f_getbufline(typval_T *argvars, typval_T *rettv)
linenr_T lnum = 1;
linenr_T end = 1;
buf_T *buf;
+ int did_emsg_before = did_emsg;
if (in_vim9script()
&& (check_for_buffer_arg(argvars, 0) == FAIL
@@ -791,6 +796,8 @@ f_getbufline(typval_T *argvars, typval_T *rettv)
if (buf != NULL)
{
lnum = tv_get_lnum_buf(&argvars[1], buf);
+ if (did_emsg > did_emsg_before)
+ return;
if (argvars[2].v_type == VAR_UNKNOWN)
end = lnum;
else
@@ -852,12 +859,14 @@ f_setbufline(typval_T *argvars, typval_T *rettv)
f_setline(typval_T *argvars, typval_T *rettv)
{
linenr_T lnum;
+ int did_emsg_before = did_emsg;
if (in_vim9script() && check_for_lnum_arg(argvars, 0) == FAIL)
return;
lnum = tv_get_lnum(&argvars[0]);
- set_buffer_lines(curbuf, lnum, FALSE, &argvars[1], rettv);
+ if (did_emsg == did_emsg_before)
+ set_buffer_lines(curbuf, lnum, FALSE, &argvars[1], rettv);
}
#endif // FEAT_EVAL