Mercurial > vim
view runtime/syntax/xkb.vim @ 7736:f2ddad8cbce7 v7.4.1166
commit https://github.com/vim/vim/commit/fcaaae6b3fdbf3421a1ff95a25ae16d82381c39a
Author: Bram Moolenaar <Bram@vim.org>
Date: Sun Jan 24 16:49:11 2016 +0100
patch 7.4.1166
Problem: Can't encode a Funcref into JSON. jsonencode() doesn't handle the
same list or dict twice properly. (Nikolay Pavlov)
Solution: Give an error. Reset copyID when the list or dict is finished.
| author | Christian Brabandt <cb@256bit.org> |
|---|---|
| date | Sun, 24 Jan 2016 17:00:04 +0100 |
| parents | 3fc0f57ecb91 |
| children | 43efa4f5a8ea |
line wrap: on
line source
" Vim syntax file " This is a GENERATED FILE. Please always refer to source file at the URI below. " Language: XKB (X Keyboard Extension) components " Maintainer: David Ne\v{c}as (Yeti) <yeti@physics.muni.cz> " Last Change: 2003-04-13 " URL: http://trific.ath.cx/Ftp/vim/syntax/xkb.vim " Setup if version >= 600 if exists("b:current_syntax") finish endif else syntax clear endif syn case match syn sync minlines=100 " Comments syn region xkbComment start="//" skip="\\$" end="$" keepend contains=xkbTodo syn region xkbComment start="/\*" matchgroup=NONE end="\*/" contains=xkbCommentStartError,xkbTodo syn match xkbCommentError "\*/" syntax match xkbCommentStartError "/\*" contained syn sync ccomment xkbComment syn keyword xkbTodo TODO FIXME contained " Literal strings syn match xkbSpecialChar "\\\d\d\d\|\\." contained syn region xkbString start=+"+ skip=+\\\\\|\\"+ end=+"+ contains=xkbSpecialChar oneline " Catch errors caused by wrong parenthesization syn region xkbParen start='(' end=')' contains=ALLBUT,xkbParenError,xkbSpecial,xkbTodo transparent syn match xkbParenError ")" syn region xkbBrace start='{' end='}' contains=ALLBUT,xkbBraceError,xkbSpecial,xkbTodo transparent syn match xkbBraceError "}" syn region xkbBracket start='\[' end='\]' contains=ALLBUT,xkbBracketError,xkbSpecial,xkbTodo transparent syn match xkbBracketError "\]" " Physical keys syn match xkbPhysicalKey "<\w\+>" " Keywords syn keyword xkbPreproc augment include replace syn keyword xkbConstant False True syn keyword xkbModif override replace syn keyword xkbIdentifier action affect alias allowExplicit approx baseColor button clearLocks color controls cornerRadius count ctrls description driveskbd font fontSize gap group groups height indicator indicatorDrivesKeyboard interpret key keys labelColor latchToLock latchMods left level_name map maximum minimum modifier_map modifiers name offColor onColor outline preserve priority repeat row section section setMods shape slant solid symbols text top type useModMapMods virtualModifier virtualMods virtual_modifiers weight whichModState width syn keyword xkbFunction AnyOf ISOLock LatchGroup LatchMods LockControls LockGroup LockMods LockPointerButton MovePtr NoAction PointerButton SetControls SetGroup SetMods SetPtrDflt Terminate syn keyword xkbTModif default hidden partial virtual syn keyword xkbSect alphanumeric_keys alternate_group function_keys keypad_keys modifier_keys xkb_compatibility xkb_geometry xkb_keycodes xkb_keymap xkb_semantics xkb_symbols xkb_types " Define the default highlighting if version >= 508 || !exists("did_xkb_syntax_inits") if version < 508 let did_xkb_syntax_inits = 1 command -nargs=+ HiLink hi link <args> else command -nargs=+ HiLink hi def link <args> endif HiLink xkbModif xkbPreproc HiLink xkbTModif xkbPreproc HiLink xkbPreproc Preproc HiLink xkbIdentifier Keyword HiLink xkbFunction Function HiLink xkbSect Type HiLink xkbPhysicalKey Identifier HiLink xkbKeyword Keyword HiLink xkbComment Comment HiLink xkbTodo Todo HiLink xkbConstant Constant HiLink xkbString String HiLink xkbSpecialChar xkbSpecial HiLink xkbSpecial Special HiLink xkbParenError xkbBalancingError HiLink xkbBraceError xkbBalancingError HiLink xkbBraketError xkbBalancingError HiLink xkbBalancingError xkbError HiLink xkbCommentStartError xkbCommentError HiLink xkbCommentError xkbError HiLink xkbError Error delcommand HiLink endif let b:current_syntax = "xkb"