forinfo_T *fi = (forinfo_T *)fi_void;
int result;
int flag = ASSIGN_FOR_LOOP | (in_vim9script()
- ? (ASSIGN_FINAL | ASSIGN_DECL | ASSIGN_NO_MEMBER_TYPE)
+ ? (ASSIGN_FINAL
+ // first round: error if variable exists
+ | (fi->fi_bi == 0 ? 0 : ASSIGN_DECL)
+ | ASSIGN_NO_MEMBER_TYPE)
: 0);
listitem_T *item;
tv.v_lock = VAR_FIXED;
tv.vval.v_string = vim_strnsave(fi->fi_string + fi->fi_byte_idx, len);
fi->fi_byte_idx += len;
+ ++fi->fi_bi;
result = ex_let_vars(arg, &tv, TRUE, fi->fi_semicolon,
fi->fi_varcount, flag, NULL) == OK;
vim_free(tv.vval.v_string);
else
{
fi->fi_lw.lw_item = item->li_next;
+ ++fi->fi_bi;
result = (ex_let_vars(arg, &item->li_tv, TRUE, fi->fi_semicolon,
fi->fi_varcount, flag, NULL) == OK);
}
enddef
def Test_for_loop_fails()
- CheckDefFailure(['for '], 'E1097:')
- CheckDefFailure(['for x'], 'E1097:')
- CheckDefFailure(['for x in'], 'E1097:')
- CheckDefFailure(['for # in range(5)'], 'E690:')
- CheckDefFailure(['for i In range(5)'], 'E690:')
- CheckDefFailure(['var x = 5', 'for x in range(5)'], 'E1017:')
+ CheckDefAndScriptFailure2(['for '], 'E1097:', 'E690:')
+ CheckDefAndScriptFailure2(['for x'], 'E1097:', 'E690:')
+ CheckDefAndScriptFailure2(['for x in'], 'E1097:', 'E15:')
+ CheckDefAndScriptFailure(['for # in range(5)'], 'E690:')
+ CheckDefAndScriptFailure(['for i In range(5)'], 'E690:')
+ CheckDefAndScriptFailure2(['var x = 5', 'for x in range(5)', 'endfor'], 'E1017:', 'E1041:')
CheckScriptFailure(['def Func(arg: any)', 'for arg in range(5)', 'enddef', 'defcompile'], 'E1006:')
delfunc! g:Func
CheckDefFailure(['for i in xxx'], 'E1001:')