Mercurial > vim
view runtime/syntax/esqlc.vim @ 33634:7c43330262d4 v9.0.2058
patch 9.0.2058: tests: avoid error when no swap files exist
Commit: https://github.com/vim/vim/commit/a36acb7ac444a789440dc30e0f04d5427069face
Author: zeertzjq <zeertzjq@outlook.com>
Date: Sat Oct 21 11:50:26 2023 +0200
patch 9.0.2058: tests: avoid error when no swap files exist
Problem: tests: avoid error when no swap files exist
Solution: use unlet! so that no error message is reported
in case the variable does not exists
When s:GetSwapFileList() does not find any swapfiles, it will return an
empty list []. This means, that the variable 'name' will not be
declared, cause the following unlet command to fail and causing a 1 sec
delay on running the tests.
So let's instead use the :unlet! command which simply skips reporting an
error when the variable given as parameter does not exists.
closes: #13396
Signed-off-by: Christian Brabandt <cb@256bit.org>
Co-authored-by: zeertzjq <zeertzjq@outlook.com>
| author | Christian Brabandt <cb@256bit.org> |
|---|---|
| date | Sat, 21 Oct 2023 12:00:04 +0200 |
| parents | 46763b01cd9a |
| children |
line wrap: on
line source
" Vim syntax file " Language: ESQL-C " Maintainer: Jonathan A. George <jageorge@tel.gte.com> " Last Change: 2001 May 09 " quit when a syntax file was already loaded if exists("b:current_syntax") finish endif " Read the C++ syntax to start with runtime! syntax/cpp.vim " ESQL-C extentions syntax keyword esqlcPreProc EXEC SQL INCLUDE syntax case ignore syntax keyword esqlcPreProc begin end declare section database open execute syntax keyword esqlcPreProc prepare fetch goto continue found sqlerror work syntax keyword esqlcKeyword access add as asc by check cluster column syntax keyword esqlcKeyword compress connect current decimal syntax keyword esqlcKeyword desc exclusive file from group syntax keyword esqlcKeyword having identified immediate increment index syntax keyword esqlcKeyword initial into is level maxextents mode modify syntax keyword esqlcKeyword nocompress nowait of offline on online start syntax keyword esqlcKeyword successful synonym table then to trigger uid syntax keyword esqlcKeyword unique user validate values view whenever syntax keyword esqlcKeyword where with option order pctfree privileges syntax keyword esqlcKeyword public resource row rowlabel rownum rows syntax keyword esqlcKeyword session share size smallint syntax keyword esqlcOperator not and or syntax keyword esqlcOperator in any some all between exists syntax keyword esqlcOperator like escape syntax keyword esqlcOperator intersect minus syntax keyword esqlcOperator prior distinct syntax keyword esqlcOperator sysdate syntax keyword esqlcStatement alter analyze audit comment commit create syntax keyword esqlcStatement delete drop explain grant insert lock noaudit syntax keyword esqlcStatement rename revoke rollback savepoint select set syntax keyword esqlcStatement truncate update " Define the default highlighting. " Only when an item doesn't have highlighting yet hi def link esqlcOperator Operator hi def link esqlcStatement Statement hi def link esqlcKeyword esqlcSpecial hi def link esqlcSpecial Special hi def link esqlcPreProc PreProc let b:current_syntax = "esqlc"