home *** CD-ROM | disk | FTP | other *** search
/ vim.ftp.fu-berlin.de / 2015-02-03.vim.ftp.fu-berlin.de.tar / vim.ftp.fu-berlin.de / mac / vim55rt.sit / runtime / syntax / ada.vim < prev    next >
Encoding:
Text File  |  1999-09-25  |  2.3 KB  |  81 lines  |  [TEXT/VIM!]
  1. " Vim syntax file
  2. " Language:    Ada (95)
  3. " Maintainer:    David A. Wheeler <wheeler@ida.org>
  4. " Last change:    1998 Dec 7
  5.  
  6. " Former Maintainer:    Simon Bradley <simon.bradley@pitechnology.com>
  7. "                       (was <sib93@aber.ac.uk>)
  8. " This version fixes an error in String/Character handling from 1997-May-5.
  9. " The formal spec of Ada95 is available at "http://www.adahome.com/rm95/".
  10.  
  11. " Remove any old syntax stuff hanging around.
  12. syn clear
  13.  
  14. " Ada is entirely case-insensitive.
  15. syn case ignore
  16.  
  17. " The Ada 95 reserved words. There are 69 reserved words in total.
  18. syn keyword adaConditional    abort case else elsif if select when
  19.  
  20. syn keyword adaKeyword        all do end exception in is new null out pragma
  21. syn keyword adaKeyword        separate then until
  22.  
  23. syn keyword adaLabel        others
  24.  
  25. syn keyword adaOperator        abs and mod not or rem xor
  26.  
  27. syn keyword adaPreCondit    begin body declare entry function generic
  28. syn keyword adaPreCondit    package procedure protected renames task use
  29. syn keyword adaPreCondit    with
  30.  
  31. syn keyword adaRepeat        exit for loop reverse while
  32.  
  33. syn keyword adaStatement    accept delay goto raise requeue return
  34. syn keyword adaStatement    terminate
  35.  
  36. syn keyword adaStructure    record
  37.  
  38. syn keyword adaType        abstract access aliased array at constant delta
  39. syn keyword adaType        digits limited of private range tagged subtype
  40. syn keyword adaType        type
  41.  
  42. " Todo.
  43. syn keyword adaTodo contained    TODO FIXME XXX
  44.  
  45. " Strings and characters.
  46. syn region  adaString        start=+"+  skip=+""+  end=+"+
  47. syn match   adaCharacter    "'.'"
  48.  
  49. " Numbers.
  50. syn match   adaNumber        "[+-]\=\<[0-9_]*\.\=[0-9_]*\>"
  51.  
  52. " Labels for the goto statement.
  53. syn region  adaLabel        start="<<"  end=">>"
  54.  
  55. " Comments.
  56. syn region  adaComment    oneline contains=adaTodo start="--"  end="$"
  57.  
  58. if !exists("did_ada_syntax_inits")
  59.   let did_ada_syntax_inits = 1
  60.   " The default methods for highlighting. Can be overridden later.
  61.   hi link adaCharacter    Character
  62.   hi link adaComment    Comment
  63.   hi link adaConditional    Conditional
  64.   hi link adaKeyword    Keyword
  65.   hi link adaLabel    Label
  66.   hi link adaNumber    Number
  67.   hi link adaOperator    Operator
  68.   hi link adaPreCondit    PreCondit
  69.   hi link adaRepeat    Repeat
  70.   hi link adaSpecial    Special
  71.   hi link adaStatement    Statement
  72.   hi link adaString    String
  73.   hi link adaStructure    Structure
  74.   hi link adaTodo    Todo
  75.   hi link adaType    Type
  76. endif
  77.  
  78. let b:current_syntax = "ada"
  79.  
  80. " vim: ts=8
  81.