call CheckDefFailure("let x = #{8: 8}", 'E1014:')
call CheckDefFailure("let x = #{xxx}", 'E720:')
- call CheckDefFailure("let x = #{xxx: 1", 'E722:')
+ call CheckDefFailure("let x = #{xxx: 1", 'E723:')
call CheckDefFailure("let x = #{xxx: 1,", 'E723:')
call CheckDefFailure("let x = {'a': xxx}", 'E1001:')
call CheckDefFailure("let x = {xxx: 8}", 'E1001:')
assert_true(caught, 'should have caught an exception')
enddef
+def Test_automatic_line_continuation()
+ let mylist = [
+ 'one',
+ 'two',
+ 'three',
+ ] " comment
+ assert_equal(['one', 'two', 'three'], mylist)
+
+ let mydict = {
+ 'one': 1,
+ 'two': 2,
+ 'three':
+ 3,
+ } " comment
+ assert_equal({'one': 1, 'two': 2, 'three': 3}, mydict)
+ mydict = #{
+ one: 1, " comment
+ two:
+ 2,
+ three: 3 " comment
+ }
+ assert_equal(#{one: 1, two: 2, three: 3}, mydict)
+enddef
+
" Keep this last, it messes up highlighting.
def Test_substitute_cmd()
new
return OK;
}
+/*
+ * Get the next line of the function from "cctx".
+ * Returns NULL when at the end.
+ */
+ static char_u *
+next_line_from_context(cctx_T *cctx)
+{
+ char_u *line = NULL;
+
+ do
+ {
+ ++cctx->ctx_lnum;
+ if (cctx->ctx_lnum >= cctx->ctx_ufunc->uf_lines.ga_len)
+ break;
+ line = ((char_u **)cctx->ctx_ufunc->uf_lines.ga_data)[cctx->ctx_lnum];
+ SOURCING_LNUM = cctx->ctx_ufunc->uf_script_ctx.sc_lnum
+ + cctx->ctx_lnum + 1;
+ } while (line == NULL);
+ return line;
+}
+
/*
* parse a list: [expr, expr]
* "*arg" points to the '['.
char_u *p = skipwhite(*arg + 1);
int count = 0;
- while (*p != ']')
+ for (;;)
{
if (*p == NUL)
{
- semsg(_(e_list_end), *arg);
- return FAIL;
+ p = next_line_from_context(cctx);
+ if (p == NULL)
+ {
+ semsg(_(e_list_end), *arg);
+ return FAIL;
+ }
+ p = skipwhite(p);
+ }
+ if (*p == ']')
+ {
+ ++p;
+ // Allow for following comment, after at least one space.
+ if (VIM_ISWHITE(*p) && *skipwhite(p) == '"')
+ p += STRLEN(p);
+ break;
}
if (compile_expr1(&p, cctx) == FAIL)
break;
++p;
p = skipwhite(p);
}
- *arg = p + 1;
+ *arg = p;
generate_NEWLIST(cctx, count);
return OK;
if (d == NULL)
return FAIL;
*arg = skipwhite(*arg + 1);
- while (**arg != '}' && **arg != NUL)
+ for (;;)
{
char_u *key = NULL;
+ if (**arg == NUL || (literal && **arg == '"'))
+ {
+ *arg = next_line_from_context(cctx);
+ if (*arg == NULL)
+ goto failret;
+ *arg = skipwhite(*arg);
+ }
+
+ if (**arg == '}')
+ break;
+
if (literal)
{
char_u *p = to_name_end(*arg, !literal);
}
*arg = skipwhite(*arg + 1);
+ if (**arg == NUL)
+ {
+ *arg = next_line_from_context(cctx);
+ if (*arg == NULL)
+ goto failret;
+ *arg = skipwhite(*arg);
+ }
+
if (compile_expr1(arg, cctx) == FAIL)
return FAIL;
++count;
+ if (**arg == NUL || *skipwhite(*arg) == '"')
+ {
+ *arg = next_line_from_context(cctx);
+ if (*arg == NULL)
+ goto failret;
+ *arg = skipwhite(*arg);
+ }
if (**arg == '}')
break;
if (**arg != ',')
}
*arg = *arg + 1;
+ // Allow for following comment, after at least one space.
+ if (VIM_ISWHITE(**arg) && *skipwhite(*arg) == '"')
+ *arg += STRLEN(*arg);
+
dict_unref(d);
return generate_NEWDICT(cctx, count);
failret:
+ if (*arg == NULL)
+ semsg(_(e_missing_dict_end), _("[end of lines]"));
dict_unref(d);
return FAIL;
}
}
else
{
- do
- {
- ++cctx.ctx_lnum;
- if (cctx.ctx_lnum == ufunc->uf_lines.ga_len)
- break;
- line = ((char_u **)ufunc->uf_lines.ga_data)[cctx.ctx_lnum];
- } while (line == NULL);
- if (cctx.ctx_lnum == ufunc->uf_lines.ga_len)
+ line = next_line_from_context(&cctx);
+ if (cctx.ctx_lnum >= ufunc->uf_lines.ga_len)
break;
- SOURCING_LNUM = ufunc->uf_script_ctx.sc_lnum + cctx.ctx_lnum + 1;
}
emsg_before = called_emsg;