Mercurial > vim
view src/testdir/test_function_lists.vim @ 32276:774c94489feb v9.0.1469
patch 9.0.1469: deferred functions not called from autocommands
Commit: https://github.com/vim/vim/commit/960cf9119e3f4922ca9719feb5e0c0bc5e3b9840
Author: zeertzjq <zeertzjq@outlook.com>
Date: Tue Apr 18 21:52:54 2023 +0100
patch 9.0.1469: deferred functions not called from autocommands
Problem: Deferred functions not called from autocommands.
Solution: Also go through the funccal_stack. (closes https://github.com/vim/vim/issues/12267)
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Tue, 18 Apr 2023 23:00:03 +0200 |
parents | a52697bcffa6 |
children |
line wrap: on
line source
" Test to verify that the three function lists: " " - global_functions[] in src/evalfunc.c " - *functions* in runtime/doc/builtin.txt " - *function-list* in runtime/doc/usr_41.txt " " contain the same functions and that the global_functions and " ":help functions" lists are in ASCII order. func Test_function_lists() " Delete any files left over from an earlier run of this test. call delete("Xglobal_functions.diff") call delete("Xfunctions.diff") call delete("Xfunction-list.diff") " Create a file of the functions in evalfunc.c:global_functions[]. enew! read ../evalfunc.c 1,/^static funcentry_T global_functions\[\] =$/d call search('^};$') .,$d v/^ {/d %s/^ {"// %s/".*// w! Xglobal_functions " Verify that those functions are in ASCII order. sort u w! Xsorted_global_functions let l:unequal = assert_equalfile("Xsorted_global_functions", "Xglobal_functions", \ "global_functions[] not sorted") if l:unequal && executable("diff") call system("diff -u Xsorted_global_functions Xglobal_functions > Xglobal_functions.diff") endif " Create a file of the functions in evalfunc.c:global_functions[] that are " not obsolete, sorted in ASCII order. enew! read ../evalfunc.c 1,/^static funcentry_T global_functions\[\] =$/d call search('^};$') .,$d v/^ {/d g/\/\/ obsolete$/d %s/^ {"// %s/".*// sort u w! ++ff=unix Xsorted_current_global_functions " Verify that the ":help functions" list is complete and in ASCII order. enew! if filereadable('../../doc/builtin.txt') " unpacked MS-Windows zip archive read ../../doc/builtin.txt else read ../../runtime/doc/builtin.txt endif call search('^USAGE') 1,.d call search('^==========') .,$d v/^\S/d %s/(.*// let l:lines = getline(1, '$') call uniq(l:lines) call writefile(l:lines, "Xfunctions") let l:unequal = assert_equalfile("Xsorted_current_global_functions", "Xfunctions", \ "\":help functions\" not sorted or incomplete") if l:unequal && executable("diff") call system("diff -u Xsorted_current_global_functions Xfunctions > Xfunctions.diff") endif " Verify that the ":help function-list" list is complete. enew! if filereadable('../../doc/usr_41.txt') " unpacked MS-Windows zip archive read ../../doc/usr_41.txt else read ../../runtime/doc/usr_41.txt endif call search('\*function-list\*$') 1,.d call search('^==*$') .,$d v/^\t\S/d %s/(.*// %left sort u w! ++ff=unix Xfunction-list let l:unequal = assert_equalfile("Xsorted_current_global_functions", "Xfunction-list", \ "\":help function-list\" incomplete") if l:unequal && executable("diff") call system("diff -u Xsorted_current_global_functions Xfunction-list > Xfunction-list.diff") endif " Clean up. call delete("Xglobal_functions") call delete("Xsorted_global_functions") call delete("Xsorted_current_global_functions") call delete("Xfunctions") call delete("Xfunction-list") enew! endfunc " vim: shiftwidth=2 sts=2 expandtab