Mercurial > vim
view src/testdir/test_function_lists.vim @ 27970:212c5894b8b1 v8.2.4510
patch 8.2.4510: Vim9: shortening commands leads to confusing script
Commit: https://github.com/vim/vim/commit/204852ae2adfdde10c656ca7f14e5b4207a69172
Author: Bram Moolenaar <Bram@vim.org>
Date: Sat Mar 5 12:56:44 2022 +0000
patch 8.2.4510: Vim9: shortening commands leads to confusing script
Problem: Vim9: shortening commands leads to confusing script.
Solution: In Vim9 script require at least ":cont" for ":continue", "const"
instead of "cons", "break" instead of "brea", "catch" instead of
"cat", "else" instead of "el" "elseif" instead of "elsei" "endfor"
instead of "endfo" "endif" instead of "en" "endtry" instead of
"endt", "finally" instead of "fina", "throw" instead of "th",
"while" instead of "wh".
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Sat, 05 Mar 2022 14:00:03 +0100 |
parents | b24b2217ff9e |
children | a7a9e8b9af89 |
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