179 static char_u *list_arg_vars(exarg_T *eap, char_u *arg, int *first);
181 static int do_unlet_var(lval_T *lp, char_u *name_end, exarg_T *eap, int deep, void *cookie);
182 static int do_lock_var(lval_T *lp, char_u *name_end, exarg_T *eap, int deep, void *cookie);
578 heredoc_get(exarg_T *eap, char_u *cmd, int script_get)  in heredoc_get()  argument
590     if (eap->getline == NULL)  in heredoc_get()
606 	p = *eap->cmdlinep;  in heredoc_get()
654 	theline = eap->getline(NUL, eap->cookie, 0, FALSE);  in heredoc_get()
664 		&& STRNCMP(theline, *eap->cmdlinep, marker_indent_len) == 0)  in heredoc_get()
708 ex_var(exarg_T *eap)  in ex_var()  argument
715     ex_let(eap);  in ex_var()
742 ex_let(exarg_T *eap)  in ex_let()  argument
744     char_u	*arg = eap->arg;  in ex_let()
758     if (eap->cmdidx == CMD_final && !vim9script)  in ex_let()
761 	ex_finally(eap);  in ex_let()
764     if (eap->cmdidx == CMD_let && vim9script)  in ex_let()
770     if (eap->cmdidx == CMD_const)  in ex_let()
772     else if (eap->cmdidx == CMD_final)  in ex_let()
776     if (eap->arg == eap->cmd)  in ex_let()
797 	else if (!ends_excmd2(eap->cmd, arg))  in ex_let()
801 		if (!ends_excmd2(eap->cmd, skipwhite(argend)))  in ex_let()
805 		    arg = vim9_declare_scriptvar(eap, arg);  in ex_let()
810 		arg = list_arg_vars(eap, arg, &first);  in ex_let()
813 	else if (!eap->skip)  in ex_let()
824 	set_nextcmd(eap, arg);  in ex_let()
832 	l = heredoc_get(eap, expr + 3, FALSE);  in ex_let()
836 	    if (!eap->skip)  in ex_let()
842 		(void)ex_let_vars(eap->arg, &rettv, FALSE, semicolon, var_count,  in ex_let()
866 		    semsg(_(e_cannot_use_operator_on_new_variable), eap->arg);  in ex_let()
893 	    if (eap->skip)  in ex_let()
895 	    fill_evalarg_from_eap(&evalarg, eap, eap->skip);  in ex_let()
898 	    i = eval0(expr, &rettv, eap, &evalarg);  in ex_let()
899 	    if (eap->skip)  in ex_let()
901 	    clear_evalarg(&evalarg, eap);  in ex_let()
907 	if (eap->skip)  in ex_let()
914 	    (void)ex_let_vars(eap->arg, &rettv, FALSE, semicolon, var_count,  in ex_let()
1187 list_arg_vars(exarg_T *eap, char_u *arg, int *first)  in list_arg_vars()  argument
1197     while (!ends_excmd2(eap->cmd, arg) && !got_int)  in list_arg_vars()
1199 	if (error || eap->skip)  in list_arg_vars()
1550 ex_unlet(exarg_T *eap)  in ex_unlet()  argument
1552     ex_unletlock(eap, eap->arg, 0, 0, do_unlet_var, NULL);  in ex_unlet()
1559 ex_lockvar(exarg_T *eap)  in ex_lockvar()  argument
1561     char_u	*arg = eap->arg;  in ex_lockvar()
1564     if (eap->forceit)  in ex_lockvar()
1572     ex_unletlock(eap, arg, deep, 0, do_lock_var, NULL);  in ex_lockvar()
1582     exarg_T	*eap,  in ex_unletlock()  argument
1606 	    if (!error && !eap->skip  in ex_unletlock()
1607 			      && callback(&lv, arg, eap, deep, cookie) == FAIL)  in ex_unletlock()
1614 	    name_end = get_lval(arg, NULL, &lv, TRUE, eap->skip || error,  in ex_unletlock()
1626 		if (!(eap->skip || error))  in ex_unletlock()
1631 	    if (!error && !eap->skip  in ex_unletlock()
1632 			 && callback(&lv, name_end, eap, deep, cookie) == FAIL)  in ex_unletlock()
1635 	    if (!eap->skip)  in ex_unletlock()
1642     set_nextcmd(eap, arg);  in ex_unletlock()
1649     exarg_T	*eap,  in do_unlet_var()  argument
1653     int		forceit = eap->forceit;  in do_unlet_var()
1807     exarg_T	*eap,  in do_lock_var()  argument
1811     int		lock = eap->cmdidx == CMD_lockvar;  in do_lock_var()
2492 set_cmdarg(exarg_T *eap, char_u *oldarg)  in set_cmdarg()  argument
2499     if (eap == NULL)  in set_cmdarg()
2506     if (eap->force_bin == FORCE_BIN)  in set_cmdarg()
2508     else if (eap->force_bin == FORCE_NOBIN)  in set_cmdarg()
2513     if (eap->read_edit)  in set_cmdarg()
2516     if (eap->force_ff != 0)  in set_cmdarg()
2518     if (eap->force_enc != 0)  in set_cmdarg()
2519 	len += (unsigned)STRLEN(eap->cmd + eap->force_enc) + 7;  in set_cmdarg()
2520     if (eap->bad_char != 0)  in set_cmdarg()
2527     if (eap->force_bin == FORCE_BIN)  in set_cmdarg()
2529     else if (eap->force_bin == FORCE_NOBIN)  in set_cmdarg()
2534     if (eap->read_edit)  in set_cmdarg()
2537     if (eap->force_ff != 0)  in set_cmdarg()
2539 						eap->force_ff == 'u' ? "unix"  in set_cmdarg()
2540 						: eap->force_ff == 'd' ? "dos"  in set_cmdarg()
2542     if (eap->force_enc != 0)  in set_cmdarg()
2544 					       eap->cmd + eap->force_enc);  in set_cmdarg()
2545     if (eap->bad_char == BAD_KEEP)  in set_cmdarg()
2547     else if (eap->bad_char == BAD_DROP)  in set_cmdarg()
2549     else if (eap->bad_char != 0)  in set_cmdarg()
2550 	sprintf((char *)newval + STRLEN(newval), " ++bad=%c", eap->bad_char);  in set_cmdarg()