129 lines
3.9 KiB
VimL
129 lines
3.9 KiB
VimL
|
if !exists('g:polyglot_disabled') || index(g:polyglot_disabled, 'vim') == -1
|
||
|
|
|
||
|
|
" Vim syntax file
|
||
|
|
" Language: CUPL
|
||
|
|
" Maintainer: John Cook <johncook3@gmail.com>
|
||
|
|
" Last Change: 2011 Dec 27
|
||
|
|
|
||
|
|
" quit when a syntax file was already loaded
|
||
|
|
if exists("b:current_syntax")
|
||
|
|
finish
|
||
|
|
endif
|
||
|
|
|
||
|
|
let s:cpo_save = &cpo
|
||
|
|
set cpo&vim
|
||
|
|
|
||
|
|
" this language is oblivious to case.
|
||
|
|
syn case ignore
|
||
|
|
|
||
|
|
" A bunch of keywords
|
||
|
|
syn keyword cuplHeader name partno date revision rev designer company nextgroup=cuplHeaderContents
|
||
|
|
syn keyword cuplHeader assembly assy location device nextgroup=cuplHeaderContents
|
||
|
|
|
||
|
|
syn keyword cuplTodo contained TODO XXX FIXME
|
||
|
|
|
||
|
|
" cuplHeaderContents uses default highlighting except for numbers
|
||
|
|
syn match cuplHeaderContents ".\+;"me=e-1 contains=cuplNumber contained
|
||
|
|
|
||
|
|
" String contstants
|
||
|
|
syn region cuplString start=+'+ end=+'+
|
||
|
|
syn region cuplString start=+"+ end=+"+
|
||
|
|
|
||
|
|
syn keyword cuplStatement append condition
|
||
|
|
syn keyword cuplStatement default else
|
||
|
|
syn keyword cuplStatement field fld format function fuse
|
||
|
|
syn keyword cuplStatement group if jump loc
|
||
|
|
syn keyword cuplStatement macro min node out
|
||
|
|
syn keyword cuplStatement pin pinnode present table
|
||
|
|
syn keyword cuplStatement sequence sequenced sequencejk sequencers sequencet
|
||
|
|
|
||
|
|
syn keyword cuplFunction log2 log8 log16 log
|
||
|
|
|
||
|
|
" Valid integer number formats (decimal, binary, octal, hex)
|
||
|
|
syn match cuplNumber "\<[-+]\=[0-9]\+\>"
|
||
|
|
syn match cuplNumber "'d'[0-9]\+\>"
|
||
|
|
syn match cuplNumber "'b'[01x]\+\>"
|
||
|
|
syn match cuplNumber "'o'[0-7x]\+\>"
|
||
|
|
syn match cuplNumber "'h'[0-9a-fx]\+\>"
|
||
|
|
|
||
|
|
" operators
|
||
|
|
syn match cuplLogicalOperator "[!#&$]"
|
||
|
|
syn match cuplArithmeticOperator "[-+*/%]"
|
||
|
|
syn match cuplArithmeticOperator "\*\*"
|
||
|
|
syn match cuplAssignmentOperator ":\=="
|
||
|
|
syn match cuplEqualityOperator ":"
|
||
|
|
syn match cuplTruthTableOperator "=>"
|
||
|
|
|
||
|
|
" Signal extensions
|
||
|
|
syn match cuplExtension "\.[as][pr]\>"
|
||
|
|
syn match cuplExtension "\.oe\>"
|
||
|
|
syn match cuplExtension "\.oemux\>"
|
||
|
|
syn match cuplExtension "\.[dlsrjk]\>"
|
||
|
|
syn match cuplExtension "\.ck\>"
|
||
|
|
syn match cuplExtension "\.dq\>"
|
||
|
|
syn match cuplExtension "\.ckmux\>"
|
||
|
|
syn match cuplExtension "\.tec\>"
|
||
|
|
syn match cuplExtension "\.cnt\>"
|
||
|
|
|
||
|
|
syn match cuplRangeOperator "\.\." contained
|
||
|
|
|
||
|
|
" match ranges like memadr:[0000..1FFF]
|
||
|
|
" and highlight both the numbers and the .. operator
|
||
|
|
syn match cuplNumberRange "\<\x\+\.\.\x\+\>" contains=cuplRangeOperator
|
||
|
|
|
||
|
|
" match vectors of type [name3..0] (decimal numbers only)
|
||
|
|
" but assign them no special highlighting except for the .. operator
|
||
|
|
syn match cuplBitVector "\<\a\+\d\+\.\.\d\+\>" contains=cuplRangeOperator
|
||
|
|
|
||
|
|
" other special characters
|
||
|
|
syn match cuplSpecialChar "[\[\](){},;]"
|
||
|
|
|
||
|
|
" directives
|
||
|
|
" (define these after cuplOperator so $xxx overrides $)
|
||
|
|
syn match cuplDirective "\$msg"
|
||
|
|
syn match cuplDirective "\$macro"
|
||
|
|
syn match cuplDirective "\$mend"
|
||
|
|
syn match cuplDirective "\$repeat"
|
||
|
|
syn match cuplDirective "\$repend"
|
||
|
|
syn match cuplDirective "\$define"
|
||
|
|
syn match cuplDirective "\$include"
|
||
|
|
|
||
|
|
" multi-line comments
|
||
|
|
syn region cuplComment start=+/\*+ end=+\*/+ contains=cuplNumber,cuplTodo
|
||
|
|
|
||
|
|
syn sync minlines=1
|
||
|
|
|
||
|
|
" Define the default highlighting.
|
||
|
|
" Only when an item doesn't have highlighting yet
|
||
|
|
|
||
|
|
" The default highlighting.
|
||
|
|
hi def link cuplHeader cuplStatement
|
||
|
|
hi def link cuplLogicalOperator cuplOperator
|
||
|
|
hi def link cuplRangeOperator cuplOperator
|
||
|
|
hi def link cuplArithmeticOperator cuplOperator
|
||
|
|
hi def link cuplAssignmentOperator cuplOperator
|
||
|
|
hi def link cuplEqualityOperator cuplOperator
|
||
|
|
hi def link cuplTruthTableOperator cuplOperator
|
||
|
|
hi def link cuplOperator cuplStatement
|
||
|
|
hi def link cuplFunction cuplStatement
|
||
|
|
hi def link cuplStatement Statement
|
||
|
|
hi def link cuplNumberRange cuplNumber
|
||
|
|
hi def link cuplNumber cuplString
|
||
|
|
hi def link cuplString String
|
||
|
|
hi def link cuplComment Comment
|
||
|
|
hi def link cuplExtension cuplSpecial
|
||
|
|
hi def link cuplSpecialChar cuplSpecial
|
||
|
|
hi def link cuplSpecial Special
|
||
|
|
hi def link cuplDirective PreProc
|
||
|
|
hi def link cuplTodo Todo
|
||
|
|
|
||
|
|
|
||
|
|
let b:current_syntax = "cupl"
|
||
|
|
|
||
|
|
let &cpo = s:cpo_save
|
||
|
|
unlet s:cpo_save
|
||
|
|
|
||
|
|
" vim:ts=8
|
||
|
|
|
||
|
|
endif
|