if (ap->pat == NULL) // pattern has been removed
return;
+ // Make sure no info referenced by "ap" is cleared, e.g. when a timer
+ // clears an augroup. Jump to "theend" after this!
+ // "ap->pat" may be cleared anyway.
+ ++autocmd_busy;
+
msg_putchar('\n');
if (got_int)
- return;
+ goto theend;
if (event != last_event || ap->group != last_group)
{
if (ap->group != AUGROUP_DEFAULT)
last_group = ap->group;
msg_putchar('\n');
if (got_int)
- return;
+ goto theend;
}
+
+ if (ap->pat == NULL)
+ goto theend; // timer might have cleared the pattern or group
+
msg_col = 4;
msg_outtrans(ap->pat);
msg_putchar('\n');
msg_col = 14;
if (got_int)
- return;
+ goto theend;
msg_outtrans(ac->cmd);
#ifdef FEAT_EVAL
if (p_verbose > 0)
last_set_msg(ac->script_ctx);
#endif
if (got_int)
- return;
+ goto theend;
if (ac->next != NULL)
{
msg_putchar('\n');
if (got_int)
- return;
+ goto theend;
}
}
+
+theend:
+ --autocmd_busy;
}
/*
set updatetime=20
call timer_start(200, 'ExitInsertMode')
call feedkeys('a', 'x!')
+ sleep 30m
call assert_equal(1, g:triggered)
unlet g:triggered
au! CursorHoldI
unlet s:res
endfunc
+func Test_autocmd_user_clear_group()
+ CheckRunVimInTerminal
+
+ let lines =<< trim END
+ autocmd! User
+ for i in range(1, 999)
+ exe 'autocmd User ' .. 'Foo' .. i .. ' bar'
+ endfor
+ au CmdlineLeave : call timer_start(0, {-> execute('autocmd! User')})
+ END
+ call writefile(lines, 'XautoUser', 'D')
+ let buf = RunVimInTerminal('-S XautoUser', {'rows': 10})
+
+ " this was using freed memory
+ call term_sendkeys(buf, ":autocmd User\<CR>")
+ call TermWait(buf, 50)
+ call term_sendkeys(buf, "G")
+
+ call StopVimInTerminal(buf)
+endfunc
+
function s:Before_test_dirchanged()
augroup test_dirchanged
autocmd!