import './vim9.vim' as v9
+source check.vim
+source screendump.vim
+
" Test for <mods> in user defined commands
function Test_cmdmods()
let g:mods = ''
call feedkeys(":com MyCmd chist\<Tab>\<C-B>\"\<CR>", 'tx')
call assert_equal("\"com MyCmd chistory", @:)
+ " delete the Check commands to avoid them showing up
+ call feedkeys(":com Check\<C-A>\<C-B>\"\<CR>", 'tx')
+ let cmds = substitute(@:, '"com ', '', '')->split()
+ for cmd in cmds
+ exe 'delcommand ' .. cmd
+ endfor
+ delcommand MissingFeature
+
command! DoCmd1 :
command! DoCmd2 :
call feedkeys(":com \<C-A>\<C-B>\"\<CR>", 'tx')
echo 'hello'
END
call v9.CheckScriptFailure(lines, 'E1026:')
+ delcommand DoesNotEnd
let lines =<< trim END
command HelloThere {
BadCommand
END
call v9.CheckScriptFailure(lines, 'E1128:')
+ delcommand BadCommand
endfunc
func Test_delcommand_buffer()
call DefCmd('Command')
let name = 'Command'
- while len(name) < 30
+ while len(name) <= 30
exe 'delcommand ' .. name
let name ..= 'x'
endwhile
delcommand Rename
endfunc
+func Test_comclear_while_listing()
+ call CheckRunVimInTerminal()
+
+ let lines =<< trim END
+ set nocompatible
+ comclear
+ for i in range(1, 999)
+ exe 'command ' .. 'Foo' .. i .. ' bar'
+ endfor
+ au CmdlineLeave : call timer_start(0, {-> execute('comclear')})
+ END
+ call writefile(lines, 'Xcommandclear', 'D')
+ let buf = RunVimInTerminal('-S Xcommandclear', {'rows': 10})
+
+ " this was using freed memory
+ call term_sendkeys(buf, ":command\<CR>")
+ call TermWait(buf, 50)
+ call term_sendkeys(buf, "j")
+ call TermWait(buf, 50)
+ call term_sendkeys(buf, "G")
+ call term_sendkeys(buf, "\<CR>")
+
+ call StopVimInTerminal(buf)
+endfunc
+
" vim: shiftwidth=2 sts=2 expandtab
// List of all user commands.
static garray_T ucmds = {0, 0, sizeof(ucmd_T), 4, NULL};
+// When non-zero it is not allowed to add or remove user commands
+static int ucmd_locked = 0;
+
#define USER_CMD(i) (&((ucmd_T *)(ucmds.ga_data))[i])
#define USER_CMD_GA(gap, i) (&((ucmd_T *)((gap)->ga_data))[i])
long a;
garray_T *gap;
+ // don't allow for adding or removing user commands here
+ ++ucmd_locked;
+
// In cmdwin, the alternative buffer should be used.
gap = &prevwin_curwin()->w_buffer->b_ucmds;
for (;;)
if (!found)
msg(_("No user-defined commands found"));
+
+ --ucmd_locked;
}
char *
uc_clear(&curbuf->b_ucmds);
}
+/*
+ * If ucmd_locked is set give an error and return TRUE.
+ * Otherwise return FALSE.
+ */
+ static int
+is_ucmd_locked(void)
+{
+ if (ucmd_locked > 0)
+ {
+ emsg(_(e_cannot_change_user_commands_while_listing));
+ return TRUE;
+ }
+ return FALSE;
+}
+
/*
* Clear all user commands for "gap".
*/
int i;
ucmd_T *cmd;
+ if (is_ucmd_locked())
+ return;
+
for (i = 0; i < gap->ga_len; ++i)
{
cmd = USER_CMD_GA(gap, i);
return;
}
+ if (is_ucmd_locked())
+ return;
+
vim_free(cmd->uc_name);
vim_free(cmd->uc_rep);
# if defined(FEAT_EVAL)