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 / modula3.vim < prev    next >
Encoding:
Text File  |  1999-09-25  |  1.9 KB  |  57 lines  |  [TEXT/VIM!]
  1. " Vim syntax file
  2. " Language:    Modula-3
  3. " Maintainer:    Timo Pedersen <dat97tpe@ludat.lth.se>
  4. " Last change:    1999 Jun 14
  5.  
  6. " Basic things only...
  7. " Based on the modula 2 syntax file
  8.  
  9. " Remove any old syntax stuff hanging around
  10. syn clear
  11.  
  12. " Modula-3 is case-sensitive
  13. " syn case ignore
  14.  
  15. " Modula-3 keywords
  16. syn keyword modula3Keyword ABS ADDRES ADR ADRSIZE AND ANY
  17. syn keyword modula3Keyword ARRAY AS BITS BITSIZE BOOLEAN BRANDED BY BYTESIZE
  18. syn keyword modula3Keyword CARDINAL CASE CEILING CHAR CONST DEC DEFINITION
  19. syn keyword modula3Keyword DISPOSE DIV
  20. syn keyword modula3Keyword EVAL EXIT EXCEPT EXCEPTION
  21. syn keyword modula3Keyword EXIT EXPORTS EXTENDED FALSE FINALLY FIRST FLOAT
  22. syn keyword modula3Keyword FLOOR FROM GENERIC IMPORT
  23. syn keyword modula3Keyword IN INC INTEGER ISTYPE LAST LOCK
  24. syn keyword modula3Keyword LONGREAL LOOPHOLE MAX METHOD MIN MOD MUTEX
  25. syn keyword modula3Keyword NARROW NEW NIL NOT NULL NUMBER OF OR ORD RAISE
  26. syn keyword modula3Keyword RAISES READONLY REAL RECORD REF REFANY
  27. syn keyword modula3Keyword RETURN ROOT
  28. syn keyword modula3Keyword ROUND SET SUBARRAY TEXT TRUE TRUNC TRY TYPE
  29. syn keyword modula3Keyword TYPECASE TYPECODE UNSAFE UNTRACED VAL VALUE VAR WITH
  30.  
  31. " Special keywords, block delimiters etc
  32. syn keyword modula3Block PROCEDURE FUNCTION MODULE INTERFACE REPEAT THEN
  33. syn keyword modula3Block BEGIN END OBJECT METHODS OVERRIDES RECORD REVEAL
  34. syn keyword modula3Block WHILE UNTIL DO TO IF FOR ELSIF ELSE LOOP
  35.  
  36. " Comments
  37. syn region modula3Comment start="(\*" end="\*)"
  38.  
  39. " Strings
  40. syn region modula3String start=+"+ end=+"+
  41. syn region modula3String start=+'+ end=+'+
  42.  
  43. if !exists("did_modula3_syntax_inits")
  44.   let did_modula3_syntax_inits = 1
  45.   " The default methods for highlighting.  Can be overridden later
  46.   hi link modula3Keyword    Statement
  47.   hi link modula3Block        PreProc
  48.   hi link modula3Comment    Comment
  49.   hi link modula3String        String
  50. endif
  51.  
  52. let b:current_syntax = "modula3"
  53.  
  54. "I prefer to use this...
  55. "set ai
  56. "vim: ts=8
  57.