share/vim/vim58/syntax/latte.vim

   1 " Vim syntax file
   2 " Language:     Latte
   3 " Maintainer:   Nick Moffitt, <nick@zork.net>
   4 " Last Change:  14 June, 2000
   5 "
   6 " Notes:
   7 " I based this on the TeX and Scheme syntax files (but mostly scheme).
   8 " See http://www.latte.org for info on the language.
   9
  10 " For version 5.x: Clear all syntax items
  11 " For version 6.x: Quit when a syntax file was already loaded
  12 if version < 600
  13   syntax clear
  14 elseif exists("b:current_syntax")
  15   finish
  16 endif
  17
  18 syn match latteError "[{}\\]"
  19 syn match latteOther "\\{"
  20 syn match latteOther "\\}"
  21 syn match latteOther "\\\\"
  22
  23 if version < 600
  24   set iskeyword=33,43,45,48-57,63,65-90,95,97-122,_
  25 else
  26   setlocal iskeyword=33,43,45,48-57,63,65-90,95,97-122,_
  27 endif
  28
  29 syn region latteVar matchgroup=SpecialChar start=!\\[A-Za-z_]!rs=s+1 end=![^A-Za-z0-9?!+_-]!me=e-1 contains=ALLBUT,latteNumber,latteOther
  30 syn region latteVar matchgroup=SpecialChar start=!\\[=\&][A-Za-z_]!rs=s+2 end=![^A-Za-z0-9?!+_-]!me=e-1 contains=ALLBUT,latteNumber,latteOther
  31 syn region latteString  start=+\\"+ skip=+\\\\"+ end=+\\"+
  32
  33 syn region latteGroup   matchgroup=Delimiter start="{" skip="\\[{}]" matchgroup=Delimiter end="}" contains=ALLBUT,latteSyntax
  34
  35 syn region latteUnquote matchgroup=Delimiter start="\\,{" skip="\\[{}]" matchgroup=Delimiter end="}" contains=ALLBUT,latteSyntax
  36 syn region latteSplice matchgroup=Delimiter start="\\,@{" skip="\\[{}]" matchgroup=Delimiter end="}" contains=ALLBUT,latteSyntax
  37 syn region latteQuote matchgroup=Delimiter start="\\'{" skip="\\[{}]" matchgroup=Delimiter end="}"
  38 syn region latteQuote matchgroup=Delimiter start="\\`{" skip="\\[{}]" matchgroup=Delimiter end="}" contains=latteUnquote,latteSplice
  39
  40 syn match  latteOperator   '\\/'
  41 syn match  latteOperator   '='
  42
  43 syn match  latteComment "\\;.*$"
  44
  45 " This was gathered by slurping in the index.
  46
  47 syn keyword latteSyntax __FILE__ __latte-version__ contained
  48 syn keyword latteSyntax _bal-tag _pre _tag add and append apply back contained
  49 syn keyword latteSyntax caar cadr car cdar cddr cdr ceil compose contained
  50 syn keyword latteSyntax concat cons def defmacro divide downcase contained
  51 syn keyword latteSyntax empty? equal? error explode file-contents contained
  52 syn keyword latteSyntax floor foreach front funcall ge?  getenv contained
  53 syn keyword latteSyntax greater-equal? greater? group group? gt? html contained
  54 syn keyword latteSyntax if include lambda le? length less-equal? contained
  55 syn keyword latteSyntax less? let lmap load-file load-library lt?  macro contained
  56 syn keyword latteSyntax member?  modulo multiply not nth operator? contained
  57 syn keyword latteSyntax or ordinary quote process-output push-back contained
  58 syn keyword latteSyntax push-front quasiquote quote random rdc reverse contained
  59 syn keyword latteSyntax set!  snoc splicing unquote strict-html4 contained
  60 syn keyword latteSyntax string-append string-ge?  string-greater-equal? contained
  61 syn keyword latteSyntax string-greater?  string-gt?  string-le? contained
  62 syn keyword latteSyntax string-less-equal?  string-less?  string-lt? contained
  63 syn keyword latteSyntax string?  subseq substr subtract  contained
  64 syn keyword latteSyntax upcase useless warn while zero?  contained
  65
  66
  67 " If it's good enough for scheme...
  68
  69 syn sync match matchPlace grouphere NONE "^[^ \t]"
  70 " ... i.e. synchronize on a line that starts at the left margin
  71
  72 " Define the default highlighting.
  73 " For version 5.7 and earlier: only when not done already
  74 " For version 5.8 and later: only when an item doesn't have highlighting yet
  75 if version >= 508 || !exists("did_latte_syntax_inits")
  76   if version < 508
  77     let did_latte_syntax_inits = 1
  78     command -nargs=+ HiLink hi link <args>
  79   else
  80     command -nargs=+ HiLink hi def link <args>
  81   endif
  82
  83   HiLink latteSyntax            Statement
  84   HiLink latteVar                       Function
  85
  86   HiLink latteString            String
  87   HiLink latteQuote                     String
  88
  89   HiLink latteDelimiter         Delimiter
  90   HiLink latteOperator          Operator
  91
  92   HiLink latteComment           Comment
  93   HiLink latteError                     Error
  94
  95   delcommand HiLink
  96 endif
  97
  98 let b:current_syntax = "latte"