" Vim syntax file" Language:	CHILL" Maintainer:	YoungSang Yoon <image@lgic.co.kr>" Last change:	2004 Jan 21" " first created by image@lgic.co.kr & modified by paris@lgic.co.kr " CHILL (CCITT High Level Programming Language) is used for" developing software of ATM switch at LGIC (LG Information" & Communications LTd.)  " For version 5.x: Clear all syntax items" For version 6.x: Quit when a syntax file was already loadedif version < 600  syntax clearelseif exists("b:current_syntax")  finishendif " A bunch of useful CHILL keywordssyn keyword	chillStatement	goto GOTO return RETURN returns RETURNSsyn keyword	chillLabel		CASE case ESAC esacsyn keyword	chillConditional	if IF else ELSE elsif ELSIF switch SWITCH THEN then FI fisyn keyword	chillLogical	NOT notsyn keyword	chillRepeat	while WHILE for FOR do DO od OD TO tosyn keyword	chillProcess	START start STACKSIZE stacksize PRIORITY priority THIS this STOP stopsyn keyword	chillBlock		PROC proc PROCESS processsyn keyword	chillSignal	RECEIVE receive SEND send NONPERSISTENT nonpersistent PERSISTENT peristent SET set EVER ever syn keyword	chillTodo		contained TODO FIXME XXX " String and Character constants" Highlight special characters (those which have a backslash) differentlysyn match	chillSpecial	contained "\\x\x\+\|\\\o\{1,3\}\|\\.\|\\$"syn region	chillString	start=+"+ skip=+\\\\\|\\"+ end=+"+ contains=chillSpecialsyn match	chillCharacter	"'[^\\]'"syn match	chillSpecialCharacter "'\\.'"syn match	chillSpecialCharacter "'\\\o\{1,3\}'" "when wanted, highlight trailing white spaceif exists("chill_space_errors")  syn match	chillSpaceError	"\s*$"  syn match	chillSpaceError	" \+\t"me=e-1endif "catch errors caused by wrong parenthesissyn cluster	chillParenGroup	contains=chillParenError,chillIncluded,chillSpecial,chillTodo,chillUserCont,chillUserLabel,chillBitFieldsyn region	chillParen		transparent start='(' end=')' contains=ALLBUT,@chillParenGroupsyn match	chillParenError	")"syn match	chillInParen	contained "[{}]" "integer number, or floating point number without a dot and with "f".syn case ignoresyn match	chillNumber		"\<\d\+\(u\=l\=\|lu\|f\)\>""floating point number, with dot, optional exponentsyn match	chillFloat		"\<\d\+\.\d*\(e[-+]\=\d\+\)\=[fl]\=\>""floating point number, starting with a dot, optional exponentsyn match	chillFloat		"\.\d\+\(e[-+]\=\d\+\)\=[fl]\=\>""floating point number, without dot, with exponentsyn match	chillFloat		"\<\d\+e[-+]\=\d\+[fl]\=\>""hex numbersyn match	chillNumber		"\<0x\x\+\(u\=l\=\|lu\)\>""syn match chillIdentifier	"\<[a-z_][a-z0-9_]*\>"syn case match" flag an octal number with wrong digitssyn match	chillOctalError	"\<0\o*[89]" if exists("chill_comment_strings")  " A comment can contain chillString, chillCharacter and chillNumber.  " But a "*/" inside a chillString in a chillComment DOES end the comment!  So we  " need to use a special type of chillString: chillCommentString, which also ends on  " "*/", and sees a "*" at the start of the line as comment again.  " Unfortunately this doesn't very well work for // type of comments :-(  syntax match	chillCommentSkip	contained "^\s*\*\($\|\s\+\)"  syntax region chillCommentString	contained start=+"+ skip=+\\\\\|\\"+ end=+"+ end=+\*/+me=s-1 contains=chillSpecial,chillCommentSkip  syntax region chillComment2String	contained start=+"+ skip=+\\\\\|\\"+ end=+"+ end="$" contains=chillSpecial  syntax region chillComment	start="/\*" end="\*/" contains=chillTodo,chillCommentString,chillCharacter,chillNumber,chillFloat,chillSpaceError  syntax match  chillComment	"//.*" contains=chillTodo,chillComment2String,chillCharacter,chillNumber,chillSpaceErrorelse  syn region	chillComment	start="/\*" end="\*/" contains=chillTodo,chillSpaceError  syn match	chillComment	"//.*" contains=chillTodo,chillSpaceErrorendifsyntax match	chillCommentError	"\*/" syn keyword	chillOperator	SIZE sizesyn keyword	chillType		dcl DCL int INT char CHAR bool BOOL REF ref LOC loc INSTANCE instancesyn keyword	chillStructure	struct STRUCT enum ENUM newmode NEWMODE synmode SYNMODE"syn keyword	chillStorageClasssyn keyword	chillBlock		PROC proc END endsyn keyword	chillScope		GRANT grant SEIZE seizesyn keyword	chillEDML		select SELECT delete DELETE update UPDATE in IN seq SEQ WHERE where INSERT insert include INCLUDE exclude EXCLUDEsyn keyword	chillBoolConst	true TRUE false FALSE syn region	chillPreCondit	start="^\s*#\s*\(if\>\|ifdef\>\|ifndef\>\|elif\>\|else\>\|endif\>\)" skip="\\$" end="$" contains=chillComment,chillString,chillCharacter,chillNumber,chillCommentError,chillSpaceErrorsyn region	chillIncluded	contained start=+"+ skip=+\\\\\|\\"+ end=+"+syn match	chillIncluded	contained "<[^>]*>"syn match	chillInclude	"^\s*#\s*include\>\s*["<]" contains=chillIncluded"syn match chillLineSkip	"\\$"syn cluster	chillPreProcGroup	contains=chillPreCondit,chillIncluded,chillInclude,chillDefine,chillInParen,chillUserLabelsyn region	chillDefine		start="^\s*#\s*\(define\>\|undef\>\)" skip="\\$" end="$" contains=ALLBUT,@chillPreProcGroupsyn region	chillPreProc	start="^\s*#\s*\(pragma\>\|line\>\|warning\>\|warn\>\|error\>\)" skip="\\$" end="$" contains=ALLBUT,@chillPreProcGroup " Highlight User Labelssyn cluster	chillMultiGroup	contains=chillIncluded,chillSpecial,chillTodo,chillUserCont,chillUserLabel,chillBitFieldsyn region	chillMulti		transparent start='?' end=':' contains=ALLBUT,@chillMultiGroup" Avoid matching foo::bar() in C++ by requiring that the next char is not ':'syn match	chillUserCont	"^\s*\I\i*\s*:$" contains=chillUserLabelsyn match	chillUserCont	";\s*\I\i*\s*:$" contains=chillUserLabelsyn match	chillUserCont	"^\s*\I\i*\s*:[^:]"me=e-1 contains=chillUserLabelsyn match	chillUserCont	";\s*\I\i*\s*:[^:]"me=e-1 contains=chillUserLabel syn match	chillUserLabel	"\I\i*" contained " Avoid recognizing most bitfields as labelssyn match	chillBitField	"^\s*\I\i*\s*:\s*[1-9]"me=e-1syn match	chillBitField	";\s*\I\i*\s*:\s*[1-9]"me=e-1 syn match	chillBracket	contained "[<>]"if !exists("chill_minlines")  let chill_minlines = 15endifexec "syn sync ccomment chillComment minlines=" . chill_minlines " Define the default highlighting." For version 5.7 and earlier: only when not done already" For version 5.8 and later: only when an item doesn't have highlighting yetif version >= 508 || !exists("did_ch_syntax_inits")  if version < 508    let did_ch_syntax_inits = 1    command -nargs=+ HiLink hi link <args>  else    command -nargs=+ HiLink hi def link <args>  endif   HiLink chillLabel	Label  HiLink chillUserLabel	Label  HiLink chillConditional	Conditional  " hi chillConditional	term=bold ctermfg=red guifg=red gui=bold   HiLink chillRepeat	Repeat  HiLink chillProcess	Repeat  HiLink chillSignal	Repeat  HiLink chillCharacter	Character  HiLink chillSpecialCharacter chillSpecial  HiLink chillNumber	Number  HiLink chillFloat	Float  HiLink chillOctalError	chillError  HiLink chillParenError	chillError  HiLink chillInParen	chillError  HiLink chillCommentError	chillError  HiLink chillSpaceError	chillError  HiLink chillOperator	Operator  HiLink chillStructure	Structure  HiLink chillBlock	Operator  HiLink chillScope	Operator  "hi chillEDML     term=underline ctermfg=DarkRed guifg=Red  HiLink chillEDML	PreProc  "hi chillBoolConst	term=bold ctermfg=brown guifg=brown  HiLink chillBoolConst	Constant  "hi chillLogical	term=bold ctermfg=brown guifg=brown  HiLink chillLogical	Constant  HiLink chillStorageClass	StorageClass  HiLink chillInclude	Include  HiLink chillPreProc	PreProc  HiLink chillDefine	Macro  HiLink chillIncluded	chillString  HiLink chillError	Error  HiLink chillStatement	Statement  HiLink chillPreCondit	PreCondit  HiLink chillType	Type  HiLink chillCommentError	chillError  HiLink chillCommentString chillString  HiLink chillComment2String chillString  HiLink chillCommentSkip	chillComment  HiLink chillString	String  HiLink chillComment	Comment  " hi chillComment	term=None ctermfg=lightblue guifg=lightblue  HiLink chillSpecial	SpecialChar  HiLink chillTodo	Todo  HiLink chillBlock	Statement  "HiLink chillIdentifier	Identifier  HiLink chillBracket	Delimiter   delcommand HiLinkendif let b:current_syntax = "chill" " vim: ts=8