94 lines
4.1 KiB
VimL
94 lines
4.1 KiB
VimL
|
if !exists('g:polyglot_disabled') || index(g:polyglot_disabled, 'vim') == -1
|
||
|
|
|
||
|
|
" Vim syntax file
|
||
|
|
" Language: PCCTS
|
||
|
|
" Maintainer: Scott Bigham <dsb@killerbunnies.org>
|
||
|
|
" Last Change: 10 Aug 1999
|
||
|
|
|
||
|
|
" quit when a syntax file was already loaded
|
||
|
|
if exists("b:current_syntax")
|
||
|
|
finish
|
||
|
|
endif
|
||
|
|
|
||
|
|
" Read the C++ syntax to start with
|
||
|
|
syn include @cppTopLevel syntax/cpp.vim
|
||
|
|
|
||
|
|
syn region pcctsAction matchgroup=pcctsDelim start="<<" end=">>?\=" contains=@cppTopLevel,pcctsRuleRef
|
||
|
|
|
||
|
|
syn region pcctsArgBlock matchgroup=pcctsDelim start="\(>\s*\)\=\[" end="\]" contains=@cppTopLevel,pcctsRuleRef
|
||
|
|
|
||
|
|
syn region pcctsString start=+"+ skip=+\\\\\|\\"+ end=+"+ contains=pcctsSpecialChar
|
||
|
|
syn match pcctsSpecialChar "\\\\\|\\\"" contained
|
||
|
|
|
||
|
|
syn region pcctsComment start="/\*" end="\*/" contains=cTodo
|
||
|
|
syn match pcctsComment "//.*$" contains=cTodo
|
||
|
|
|
||
|
|
syn region pcctsDirective start="^\s*#header\s\+<<" end=">>" contains=pcctsAction keepend
|
||
|
|
syn match pcctsDirective "^\s*#parser\>.*$" contains=pcctsString,pcctsComment
|
||
|
|
syn match pcctsDirective "^\s*#tokdefs\>.*$" contains=pcctsString,pcctsComment
|
||
|
|
syn match pcctsDirective "^\s*#token\>.*$" contains=pcctsString,pcctsAction,pcctsTokenName,pcctsComment
|
||
|
|
syn region pcctsDirective start="^\s*#tokclass\s\+[A-Z]\i*\s\+{" end="}" contains=pcctsString,pcctsTokenName
|
||
|
|
syn match pcctsDirective "^\s*#lexclass\>.*$" contains=pcctsTokenName
|
||
|
|
syn region pcctsDirective start="^\s*#errclass\s\+[^{]\+\s\+{" end="}" contains=pcctsString,pcctsTokenName
|
||
|
|
syn match pcctsDirective "^\s*#pred\>.*$" contains=pcctsTokenName,pcctsAction
|
||
|
|
|
||
|
|
syn cluster pcctsInRule contains=pcctsString,pcctsRuleName,pcctsTokenName,pcctsAction,pcctsArgBlock,pcctsSubRule,pcctsLabel,pcctsComment
|
||
|
|
|
||
|
|
syn region pcctsRule start="\<[a-z][A-Za-z0-9_]*\>\(\s*\[[^]]*\]\)\=\(\s*>\s*\[[^]]*\]\)\=\s*:" end=";" contains=@pcctsInRule
|
||
|
|
|
||
|
|
syn region pcctsSubRule matchgroup=pcctsDelim start="(" end=")\(+\|\*\|?\(\s*=>\)\=\)\=" contains=@pcctsInRule contained
|
||
|
|
syn region pcctsSubRule matchgroup=pcctsDelim start="{" end="}" contains=@pcctsInRule contained
|
||
|
|
|
||
|
|
syn match pcctsRuleName "\<[a-z]\i*\>" contained
|
||
|
|
syn match pcctsTokenName "\<[A-Z]\i*\>" contained
|
||
|
|
|
||
|
|
syn match pcctsLabel "\<\I\i*:\I\i*" contained contains=pcctsLabelHack,pcctsRuleName,pcctsTokenName
|
||
|
|
syn match pcctsLabel "\<\I\i*:\"\([^\\]\|\\.\)*\"" contained contains=pcctsLabelHack,pcctsString
|
||
|
|
syn match pcctsLabelHack "\<\I\i*:" contained
|
||
|
|
|
||
|
|
syn match pcctsRuleRef "\$\I\i*\>" contained
|
||
|
|
syn match pcctsRuleRef "\$\d\+\(\.\d\+\)\>" contained
|
||
|
|
|
||
|
|
syn keyword pcctsClass class nextgroup=pcctsClassName skipwhite
|
||
|
|
syn match pcctsClassName "\<\I\i*\>" contained nextgroup=pcctsClassBlock skipwhite skipnl
|
||
|
|
syn region pcctsClassBlock start="{" end="}" contained contains=pcctsRule,pcctsComment,pcctsDirective,pcctsAction,pcctsException,pcctsExceptionHandler
|
||
|
|
|
||
|
|
syn keyword pcctsException exception nextgroup=pcctsExceptionRuleRef skipwhite
|
||
|
|
syn match pcctsExceptionRuleRef "\[\I\i*\]" contained contains=pcctsExceptionID
|
||
|
|
syn match pcctsExceptionID "\I\i*" contained
|
||
|
|
syn keyword pcctsExceptionHandler catch default
|
||
|
|
syn keyword pcctsExceptionHandler NoViableAlt NoSemViableAlt
|
||
|
|
syn keyword pcctsExceptionHandler MismatchedToken
|
||
|
|
|
||
|
|
syn sync clear
|
||
|
|
syn sync match pcctsSyncAction grouphere pcctsAction "<<"
|
||
|
|
syn sync match pcctsSyncAction "<<\([^>]\|>[^>]\)*>>"
|
||
|
|
syn sync match pcctsSyncRule grouphere pcctsRule "\<[a-z][A-Za-z0-9_]*\>\s*\[[^]]*\]\s*:"
|
||
|
|
syn sync match pcctsSyncRule grouphere pcctsRule "\<[a-z][A-Za-z0-9_]*\>\(\s*\[[^]]*\]\)\=\s*>\s*\[[^]]*\]\s*:"
|
||
|
|
|
||
|
|
" Define the default highlighting.
|
||
|
|
" Only when an item doesn't have highlighting yet
|
||
|
|
|
||
|
|
hi def link pcctsDelim Special
|
||
|
|
hi def link pcctsTokenName Identifier
|
||
|
|
hi def link pcctsRuleName Statement
|
||
|
|
hi def link pcctsLabelHack Label
|
||
|
|
hi def link pcctsDirective PreProc
|
||
|
|
hi def link pcctsString String
|
||
|
|
hi def link pcctsComment Comment
|
||
|
|
hi def link pcctsClass Statement
|
||
|
|
hi def link pcctsClassName Identifier
|
||
|
|
hi def link pcctsException Statement
|
||
|
|
hi def link pcctsExceptionHandler Keyword
|
||
|
|
hi def link pcctsExceptionRuleRef pcctsDelim
|
||
|
|
hi def link pcctsExceptionID Identifier
|
||
|
|
hi def link pcctsRuleRef Identifier
|
||
|
|
hi def link pcctsSpecialChar SpecialChar
|
||
|
|
|
||
|
|
|
||
|
|
let b:current_syntax = "pccts"
|
||
|
|
|
||
|
|
" vim: ts=8
|
||
|
|
|
||
|
|
endif
|