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 / unix / vim-6.2.tar.bz2 / vim-6.2.tar / vim62 / runtime / syntax / aflex.vim < prev    next >
Encoding:
Text File  |  2002-11-18  |  4.7 KB  |  101 lines
  1.  
  2. " Vim syntax file
  3. " Language:    AfLex (from Lex syntax file)
  4. " Maintainer:    Mathieu Clabaut <mathieu.clabaut@free.fr>
  5. " LastChange:    02 May 2001
  6. " Original:    Lex, maintained by Dr. Charles E. Campbell, Jr.
  7. " Comment:    Replaced sourcing c.vim file by ada.vim and rename lex*
  8. "        in aflex*
  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. " Read the Ada syntax to start with
  19. if version < 600
  20.    so <sfile>:p:h/ada.vim
  21. else
  22.    runtime! syntax/ada.vim
  23.    unlet b:current_syntax
  24. endif
  25.  
  26.  
  27. " --- AfLex stuff ---
  28.  
  29. "I'd prefer to use aflex.* , but it doesn't handle forward definitions yet
  30. syn cluster aflexListGroup        contains=aflexAbbrvBlock,aflexAbbrv,aflexAbbrv,aflexAbbrvRegExp,aflexInclude,aflexPatBlock,aflexPat,aflexBrace,aflexPatString,aflexPatTag,aflexPatTag,aflexPatComment,aflexPatCodeLine,aflexMorePat,aflexPatSep,aflexSlashQuote,aflexPatCode,cInParen,cUserLabel,cOctalZero,cCppSkip,cErrInBracket,cErrInParen,cOctalError,cCppOut2
  31. syn cluster aflexListPatCodeGroup    contains=aflexAbbrvBlock,aflexAbbrv,aflexAbbrv,aflexAbbrvRegExp,aflexInclude,aflexPatBlock,aflexPat,aflexBrace,aflexPatTag,aflexPatTag,aflexPatComment,aflexPatCodeLine,aflexMorePat,aflexPatSep,aflexSlashQuote,cInParen,cUserLabel,cOctalZero,cCppSkip,cErrInBracket,cErrInParen,cOctalError,cCppOut2
  32.  
  33. " Abbreviations Section
  34. syn region aflexAbbrvBlock    start="^\([a-zA-Z_]\+\t\|%{\)" end="^%%$"me=e-2    skipnl    nextgroup=aflexPatBlock contains=aflexAbbrv,aflexInclude,aflexAbbrvComment
  35. syn match  aflexAbbrv        "^\I\i*\s"me=e-1            skipwhite    contained nextgroup=aflexAbbrvRegExp
  36. syn match  aflexAbbrv        "^%[sx]"                    contained
  37. syn match  aflexAbbrvRegExp    "\s\S.*$"lc=1                contained nextgroup=aflexAbbrv,aflexInclude
  38. syn region aflexInclude    matchgroup=aflexSep    start="^%{" end="%}"    contained    contains=ALLBUT,@aflexListGroup
  39. syn region aflexAbbrvComment    start="^\s\+/\*"    end="\*/"
  40.  
  41. "%% : Patterns {Actions}
  42. syn region aflexPatBlock    matchgroup=Todo    start="^%%$" matchgroup=Todo end="^%%$"    skipnl skipwhite contains=aflexPat,aflexPatTag,aflexPatComment
  43. syn region aflexPat        start=+\S+ skip="\\\\\|\\."    end="\s"me=e-1    contained nextgroup=aflexMorePat,aflexPatSep contains=aflexPatString,aflexSlashQuote,aflexBrace
  44. syn region aflexBrace    start="\[" skip=+\\\\\|\\+        end="]"        contained
  45. syn region aflexPatString    matchgroup=String start=+"+    skip=+\\\\\|\\"+    matchgroup=String end=+"+    contained
  46. syn match  aflexPatTag    "^<\I\i*\(,\I\i*\)*>*"            contained nextgroup=aflexPat,aflexPatTag,aflexMorePat,aflexPatSep
  47. syn match  aflexPatTag    +^<\I\i*\(,\I\i*\)*>*\(\\\\\)*\\"+        contained nextgroup=aflexPat,aflexPatTag,aflexMorePat,aflexPatSep
  48. syn region aflexPatComment    start="^\s*/\*" end="\*/"        skipnl    contained contains=cTodo nextgroup=aflexPatComment,aflexPat,aflexPatString,aflexPatTag
  49. syn match  aflexPatCodeLine    ".*$"                    contained contains=ALLBUT,@aflexListGroup
  50. syn match  aflexMorePat    "\s*|\s*$"            skipnl    contained nextgroup=aflexPat,aflexPatTag,aflexPatComment
  51. syn match  aflexPatSep    "\s\+"                    contained nextgroup=aflexMorePat,aflexPatCode,aflexPatCodeLine
  52. syn match  aflexSlashQuote    +\(\\\\\)*\\"+                contained
  53. syn region aflexPatCode matchgroup=Delimiter start="{" matchgroup=Delimiter end="}"    skipnl contained contains=ALLBUT,@aflexListPatCodeGroup
  54.  
  55. syn keyword aflexCFunctions    BEGIN    input    unput    woutput    yyleng    yylook    yytext
  56. syn keyword aflexCFunctions    ECHO    output    winput    wunput    yyless    yymore    yywrap
  57.  
  58. " <c.vim> includes several ALLBUTs; these have to be treated so as to exclude aflex* groups
  59. syn cluster cParenGroup    add=aflex.*
  60. syn cluster cDefineGroup    add=aflex.*
  61. syn cluster cPreProcGroup    add=aflex.*
  62. syn cluster cMultiGroup    add=aflex.*
  63.  
  64. " Synchronization
  65. syn sync clear
  66. syn sync minlines=300
  67. syn sync match aflexSyncPat    grouphere  aflexPatBlock    "^%[a-zA-Z]"
  68. syn sync match aflexSyncPat    groupthere aflexPatBlock    "^<$"
  69. syn sync match aflexSyncPat    groupthere aflexPatBlock    "^%%$"
  70.  
  71. " Define the default highlighting.
  72. " For version 5.7 and earlier: only when not done already
  73. " For version 5.8 and later: only when an item doesn't have highlighting yet
  74.  
  75. if version >= 508 || !exists("did_aflex_syntax_inits")
  76.    if version < 508
  77.       let did_aflex_syntax_inits = 1
  78.       command -nargs=+ HiLink hi link <args>
  79.    else
  80.       command -nargs=+ HiLink hi def link <args>
  81.    endif
  82.   HiLink    aflexSlashQuote    aflexPat
  83.   HiLink    aflexBrace        aflexPat
  84.   HiLink aflexAbbrvComment    aflexPatComment
  85.  
  86.   HiLink    aflexAbbrv        SpecialChar
  87.   HiLink    aflexAbbrvRegExp    Macro
  88.   HiLink    aflexCFunctions    Function
  89.   HiLink    aflexMorePat    SpecialChar
  90.   HiLink    aflexPat        Function
  91.   HiLink    aflexPatComment    Comment
  92.   HiLink    aflexPatString    Function
  93.   HiLink    aflexPatTag        Special
  94.   HiLink    aflexSep        Delimiter
  95.   delcommand HiLink
  96. endif
  97.  
  98. let b:current_syntax = "aflex"
  99.  
  100. " vim:ts=10
  101.