" Vim syntax file
" Language:	occam
" Maintainer:	Fred Barnes <frmb2@ukc.ac.uk>
" Updated:	2002 May 11
"

if version < 600
  syntax clear
elseif exists("b:current_syntax")
  finish
endif

syn case match

syn keyword occamType		BYTE BOOL REAL INT INT16 INT32 INT64 REAL32 REAL64
syn keyword occamType		CHAN DATA OF TYPE TIMER INITIAL VAL PORT TYPE MOBILE
syn keyword occamType		RECORD PROTOCOL

syn keyword occamStructure	SEQ PAR IF ALT PRI

syn keyword occamKeyword	PROC IS TRUE FALSE SIZE AND OR XOR NOT
syn keyword occamKeyword	RETYPES RESHAPES STEP FROM FOR RESCHEDULE STOP SKIP
syn keyword occamKeyword	FUNCTION VALOF RESULT ELSE
syn keyword occamBoolean	TRUE FALSE
syn keyword occamRepeat		WHILE
syn keyword occamConditional	CASE
syn keyword occamConstant	MOSTNEG MOSTPOS

syn keyword occamOperator	AFTER TIMES MINUS PLUS INITIAL

syn match occamOperator		/::\|:=\|?\|!/

syn match occamSpecialChar	/\M**\|*'\|*"\|*#\(\[0-9A-F\]\+\)/ contained
syn match occamChar		/\M\L\='\[^*\]'/
syn match occamChar		/L'[^']*'/ contains=occamSpecialChar

syn match occamComment		/--.*/
syn match occamIdentifier	/\<[A-Z.][A-Z.0-9]*/
syn match occamFunction		/\<[A-Za-z.][A-Za-z0-9.]*/ contained

syn region occamString		start=/"/ skip=/\M*"/ end=/"/ contains=occamSpecialChar

syn keyword occamCDstr		EXTERNAL DEFINED SHARED NOALIAS NOUSAGE

syn region occamCDirective	start=/^\s*#\(USE\|INCLUDE\|PRAGMA\)/ end=/$/ contains=occamString,occamComment,occamCDStr

if version >= 508 || !exists("did_c_syn_inits")
  if version < 508
    let did_c_syn_inits = 1
    command -nargs=+ HiLink hi link <args>
  else
    command -nargs=+ HiLink hi def link <args>
  endif

  HiLink occamType Type
  HiLink occamKeyword Keyword
  HiLink occamComment Comment
  HiLink occamString String
  HiLink occamCDirective PreProc
  HiLink occamBoolean Boolean
  HiLink occamSpecial SpecialChar
  HiLink occamChar Character
  HiLink occamStructure Structure
  HiLink occamIdentifier Identifier
  HiLink occamConstant Constant
  HiLink occamOperator Operator
  HiLink occamCDStr Identifier
  HiLink occamFunction Ignore
  HiLink occamRepeat Repeat
  HiLink occamConditional Conditional

  delcommand HiLink
endif