mirror of
				https://github.com/vim/vim.git
				synced 2025-10-25 09:04:09 -04:00 
			
		
		
		
	
		
			
	
	
		
			136 lines
		
	
	
		
			6.3 KiB
		
	
	
	
		
			VimL
		
	
	
	
	
	
		
		
			
		
	
	
			136 lines
		
	
	
		
			6.3 KiB
		
	
	
	
		
			VimL
		
	
	
	
	
	
|   | " Vim syntax file | ||
|  | " Language:	MS Message Text files (*.mc) | ||
|  | " Maintainer:	Kevin Locke <kwl7@cornell.edu> | ||
|  | " Last Change:	2008 April 09 | ||
|  | " Location:	http://kevinlocke.name/programs/vim/syntax/msmessages.vim | ||
|  | 
 | ||
|  | " See format description at <http://msdn2.microsoft.com/en-us/library/aa385646.aspx> | ||
|  | " This file is based on the rc.vim and c.vim | ||
|  | 
 | ||
|  | " For version 5.x: Clear all syntax items | ||
|  | " For version 6.x: Quit when a syntax file was already loaded | ||
|  | if version < 600 | ||
|  |   syntax clear | ||
|  | elseif exists("b:current_syntax") | ||
|  |   finish | ||
|  | endif | ||
|  | 
 | ||
|  | " Common MS Messages keywords | ||
|  | syn case ignore | ||
|  | syn keyword msmessagesIdentifier MessageIdTypedef | ||
|  | syn keyword msmessagesIdentifier SeverityNames | ||
|  | syn keyword msmessagesIdentifier FacilityNames | ||
|  | syn keyword msmessagesIdentifier LanguageNames | ||
|  | syn keyword msmessagesIdentifier OutputBase | ||
|  | 
 | ||
|  | syn keyword msmessagesIdentifier MessageId | ||
|  | syn keyword msmessagesIdentifier Severity | ||
|  | syn keyword msmessagesIdentifier Facility | ||
|  | syn keyword msmessagesIdentifier OutputBase | ||
|  | 
 | ||
|  | syn match msmessagesIdentifier /\<SymbolicName\>/ nextgroup=msmessagesIdentEq skipwhite | ||
|  | syn match msmessagesIdentEq transparent /=/ nextgroup=msmessagesIdentDef skipwhite contained | ||
|  | syn match msmessagesIdentDef display /\w\+/ contained | ||
|  | " Note:  The Language keyword is highlighted as part of an msmessagesLangEntry | ||
|  | 
 | ||
|  | " Set value | ||
|  | syn case match | ||
|  | syn region msmessagesSet	start="(" end=")" transparent fold contains=msmessagesName keepend | ||
|  | syn match msmessagesName /\w\+/ nextgroup=msmessagesSetEquals skipwhite contained | ||
|  | syn match msmessagesSetEquals /=/ display transparent nextgroup=msmessagesNumVal skipwhite contained | ||
|  | syn match msmessagesNumVal	display transparent "\<\d\|\.\d" contains=msmessagesNumber,msmessagesFloat,msmessagesOctalError,msmessagesOctal nextgroup=msmessagesValSep | ||
|  | syn match msmessagesValSep /:/ display nextgroup=msmessagesNameDef contained | ||
|  | syn match msmessagesNameDef /\w\+/ display contained | ||
|  | 
 | ||
|  | 
 | ||
|  | " Comments are converted to C source (by removing leading ;) | ||
|  | " So we highlight the comments as C | ||
|  | syn include @msmessagesC syntax/c.vim | ||
|  | unlet b:current_syntax | ||
|  | syn region msmessagesCComment matchgroup=msmessagesComment start=/;/ end=/$/ contains=@msmessagesC keepend | ||
|  | 
 | ||
|  | " String and Character constants | ||
|  | " Highlight special characters (those which have a escape) differently | ||
|  | syn case ignore | ||
|  | syn region msmessagesLangEntry start=/\<Language\>\s*=\s*\S\+\s*$/hs=e+1 end=/^\./ contains=msmessagesFormat,msmessagesLangEntryEnd,msmessagesLanguage keepend | ||
|  | syn match msmessagesLanguage /\<Language\(\s*=\)\@=/ contained | ||
|  | syn match msmessagesLangEntryEnd display /^\./ contained | ||
|  | syn case match | ||
|  | syn match msmessagesFormat display	/%[1-9]\d\?\(![-+0 #]*\d*\(\.\d\+\)\?\(h\|l\|ll\|I\|I32\|I64\)\?[aAcCdeEfgGinopsSuxX]!\)\?/ contained | ||
|  | syn match msmessagesFormat display	/%[0.%\\br]/ contained | ||
|  | syn match msmessagesFormat display	/%!\(\s\)\@=/ contained | ||
|  | 
 | ||
|  | " Integer number, or floating point number without a dot and with "f". | ||
|  | " Copied from c.vim | ||
|  | syn case ignore | ||
|  | "(long) integer | ||
|  | syn match msmessagesNumber	display contained "\d\+\(u\=l\{0,2}\|ll\=u\)\>" | ||
|  | "hex number | ||
|  | syn match msmessagesNumber	display contained "\<0x\x\+\(u\=l\{0,2}\|ll\=u\)\>" | ||
|  | " Flag the first zero of an octal number as something special | ||
|  | syn match msmessagesOctal	display contained "\<0\o\+\(u\=l\{0,2}\|ll\=u\)\>" contains=msmessagesOctalZero | ||
|  | syn match msmessagesOctalZero	display contained "\<0" | ||
|  | " flag an octal number with wrong digits | ||
|  | syn match msmessagesOctalError	display contained "\<0\o*[89]\d*" | ||
|  | syn match msmessagesFloat	display contained "\d\+f" | ||
|  | "floating point number, with dot, optional exponent | ||
|  | syn match msmessagesFloat	display contained "\d\+\.\d*\(e[-+]\=\d\+\)\=[fl]\=" | ||
|  | "floating point number, starting with a dot, optional exponent | ||
|  | syn match msmessagesFloat	display contained "\.\d\+\(e[-+]\=\d\+\)\=[fl]\=\>" | ||
|  | "floating point number, without dot, with exponent | ||
|  | syn match msmessagesFloat	display contained "\d\+e[-+]\=\d\+[fl]\=\>" | ||
|  | "hexadecimal floating point number, optional leading digits, with dot, with exponent | ||
|  | syn match msmessagesFloat	display contained "0x\x*\.\x\+p[-+]\=\d\+[fl]\=\>" | ||
|  | "hexadecimal floating point number, with leading digits, optional dot, with exponent | ||
|  | syn match msmessagesFloat	display contained "0x\x\+\.\=p[-+]\=\d\+[fl]\=\>" | ||
|  | 
 | ||
|  | " Types (used in MessageIdTypedef statement) | ||
|  | syn case match | ||
|  | syn keyword msmessagesType	int long short char | ||
|  | syn keyword msmessagesType	signed unsigned | ||
|  | syn keyword msmessagesType	size_t ssize_t sig_atomic_t | ||
|  | syn keyword msmessagesType	int8_t int16_t int32_t int64_t | ||
|  | syn keyword msmessagesType	uint8_t uint16_t uint32_t uint64_t | ||
|  | syn keyword msmessagesType	int_least8_t int_least16_t int_least32_t int_least64_t | ||
|  | syn keyword msmessagesType	uint_least8_t uint_least16_t uint_least32_t uint_least64_t | ||
|  | syn keyword msmessagesType	int_fast8_t int_fast16_t int_fast32_t int_fast64_t | ||
|  | syn keyword msmessagesType	uint_fast8_t uint_fast16_t uint_fast32_t uint_fast64_t | ||
|  | syn keyword msmessagesType	intptr_t uintptr_t | ||
|  | syn keyword msmessagesType	intmax_t uintmax_t | ||
|  | " Add some Windows datatypes that will be common in msmessages files | ||
|  | syn keyword msmessagesType	BYTE CHAR SHORT SIZE_T SSIZE_T TBYTE TCHAR UCHAR USHORT | ||
|  | syn keyword msmessagesType	DWORD DWORDLONG DWORD32 DWORD64 | ||
|  | syn keyword msmessagesType	INT INT32 INT64 UINT UINT32 UINT64 | ||
|  | syn keyword msmessagesType	LONG LONGLONG LONG32 LONG64 | ||
|  | syn keyword msmessagesType	ULONG ULONGLONG ULONG32 ULONG64 | ||
|  | 
 | ||
|  | " Sync to language entries, since they should be most common | ||
|  | syn sync match msmessagesLangSync grouphere msmessagesLangEntry "\<Language\s*=" | ||
|  | syn sync match msmessagesLangEndSync grouphere NONE "^\." | ||
|  | 
 | ||
|  | " Define the default highlighting. | ||
|  | hi def link msmessagesNumber		Number | ||
|  | hi def link msmessagesOctal		Number | ||
|  | hi def link msmessagesFloat		Float | ||
|  | hi def link msmessagesOctalError	msmessagesError | ||
|  | hi def link msmessagesSetError		msmessagesError | ||
|  | hi def link msmessagesError		Error | ||
|  | hi def link msmessagesLangEntry		String | ||
|  | hi def link msmessagesLangEntryEnd	Special | ||
|  | hi def link msmessagesComment		Comment | ||
|  | hi def link msmessagesFormat		msmessagesSpecial | ||
|  | hi def link msmessagesSpecial		SpecialChar | ||
|  | 
 | ||
|  | hi def link msmessagesType		Type | ||
|  | hi def link msmessagesIdentifier	Identifier | ||
|  | hi def link msmessagesLanguage		msmessagesIdentifier | ||
|  | hi def link msmessagesName		msmessagesIdentifier | ||
|  | hi def link msmessagesNameDef		Macro | ||
|  | hi def link msmessagesIdentDef		Macro | ||
|  | hi def link msmessagesValSep		Special | ||
|  | hi def link msmessagesNameErr		Error | ||
|  | 
 | ||
|  | let b:current_syntax = "msmessages" | ||
|  | 
 | ||
|  | " vim: ts=8 |