share/vim/vim58/syntax/slang.vim

   1 " Vim syntax file
   2 " Language:     S-Lang
   3 " Maintainer:   Jan Hlavacek <lahvak@math.ohio-state.edu>
   4 " Last Change:  980216
   5
   6 " For version 5.x: Clear all syntax items
   7 " For version 6.x: Quit when a syntax file was already loaded
   8 if version < 600
   9   syntax clear
  10 elseif exists("b:current_syntax")
  11   finish
  12 endif
  13
  14 syn keyword slangStatement      break return continue EXECUTE_ERROR_BLOCK
  15 syn match slangStatement        "\<X_USER_BLOCK[0-4]\>"
  16 syn keyword slangLabel          case
  17 syn keyword slangConditional    !if if else switch
  18 syn keyword slangRepeat         while for _for loop do forever
  19 syn keyword slangDefinition     define typedef variable struct
  20 syn keyword slangOperator       or and andelse orelse shr shl xor not
  21 syn keyword slangBlock          EXIT_BLOCK ERROR_BLOCK
  22 syn match slangBlock            "\<USER_BLOCK[0-4]\>"
  23 syn keyword slangConstant       NULL
  24 syn keyword slangType           Integer_Type Double_Type Complex_Type String_Type Struct_Type Ref_Type Null_Type Array_Type DataType_Type
  25
  26 syn match slangOctal            "\<0\d\+\>" contains=slangOctalError
  27 syn match slangOctalError       "[89]\+" contained
  28 syn match slangHex              "\<0[xX][0-9A-Fa-f]*\>"
  29 syn match slangDecimal          "\<[1-9]\d*\>"
  30 syn match slangFloat            "\<\d\+\."
  31 syn match slangFloat            "\<\d\+\.\d\+\([Ee][-+]\=\d\+\)\=\>"
  32 syn match slangFloat            "\<\d\+\.[Ee][-+]\=\d\+\>"
  33 syn match slangFloat            "\<\d\+[Ee][-+]\=\d\+\>"
  34 syn match slangFloat            "\.\d\+\([Ee][-+]\=\d\+\)\=\>"
  35 syn match slangImaginary        "\.\d\+\([Ee][-+]\=\d*\)\=[ij]\>"
  36 syn match slangImaginary        "\<\d\+\(\.\d*\)\=\([Ee][-+]\=\d\+\)\=[ij]\>"
  37
  38 syn region slangString oneline start='"' end='"' skip='\\"'
  39 syn match slangCharacter        "'[^\\]'"
  40 syn match slangCharacter        "'\\.'"
  41 syn match slangCharacter        "'\\[0-7]\{1,3}'"
  42 syn match slangCharacter        "'\\d\d\{1,3}'"
  43 syn match slangCharacter        "'\\x[0-7a-fA-F]\{1,2}'"
  44
  45 syn match slangDelim            "[][{};:,]"
  46 syn match slangOperator         "[-%+/&*=<>|!~^@]"
  47
  48 "catch errors caused by wrong parenthesis
  49 syn region slangParen   matchgroup=slangDelim transparent start='(' end=')' contains=ALLBUT,slangParenError
  50 syn match slangParenError       ")"
  51
  52 syn match slangComment          "%.*$"
  53 syn keyword slangOperator       sizeof
  54
  55 syn region slangPreCondit start="^\s*#\s*\(ifdef\>\|ifndef\>\|iftrue\>\|ifnfalse\>\|iffalse\>\|ifntrue\>\|if\$\|ifn\$\|\|elif\>\|else\>\|endif\>\)" skip="\\$" end="$" contains=cComment,slangString,slangCharacter,slangNumber
  56
  57 " Define the default highlighting.
  58 " For version 5.7 and earlier: only when not done already
  59 " For version 5.8 and later: only when an item doesn't have highlighting yet
  60 if version >= 508 || !exists("did_slang_syntax_inits")
  61   if version < 508
  62     let did_slang_syntax_inits = 1
  63     command -nargs=+ HiLink hi link <args>
  64   else
  65     command -nargs=+ HiLink hi def link <args>
  66   endif
  67
  68   HiLink slangDefinition        Type
  69   HiLink slangBlock             slangDefinition
  70   HiLink slangLabel             Label
  71   HiLink slangConditional       Conditional
  72   HiLink slangRepeat            Repeat
  73   HiLink slangCharacter Character
  74   HiLink slangFloat             Float
  75   HiLink slangImaginary Float
  76   HiLink slangDecimal           slangNumber
  77   HiLink slangOctal             slangNumber
  78   HiLink slangHex               slangNumber
  79   HiLink slangNumber            Number
  80   HiLink slangParenError        Error
  81   HiLink slangOctalError        Error
  82   HiLink slangOperator          Operator
  83   HiLink slangStructure Structure
  84   HiLink slangInclude           Include
  85   HiLink slangPreCondit PreCondit
  86   HiLink slangError             Error
  87   HiLink slangStatement Statement
  88   HiLink slangType              Type
  89   HiLink slangString            String
  90   HiLink slangConstant          Constant
  91   HiLink slangRangeArray        slangConstant
  92   HiLink slangComment           Comment
  93   HiLink slangSpecial           SpecialChar
  94   HiLink slangTodo              Todo
  95   HiLink slangDelim             Delimiter
  96
  97   delcommand HiLink
  98 endif
  99
 100 let b:current_syntax = "slang"
 101
 102 " vim: ts=8