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 / runtime / dos / syntax / r.vim < prev    next >
Encoding:
Text File  |  2011-05-27  |  6.8 KB  |  203 lines
  1. " Vim syntax file
  2. " Language:          R (GNU S)
  3. " Maintainer:          Jakson Aquino <jalvesaq@gmail.com>
  4. " Former Maintainers: Vaidotas Zemlys <zemlys@gmail.com>
  5. "               Tom Payne <tom@tompayne.org>
  6. " Last Change:          Sun Feb 20, 2011  12:06PM
  7. " Filenames:          *.R *.r *.Rhistory *.Rt
  8. " 
  9. " NOTE: The highlighting of R functions is defined in the
  10. " r-plugin/functions.vim, which is part of vim-r-plugin2:
  11. " http://www.vim.org/scripts/script.php?script_id=2628
  12. "
  13. " CONFIGURATION:
  14. "   syntax folding can be turned on by
  15. "
  16. "      let r_syntax_folding = 1
  17. "
  18. " Some lines of code were borrowed from Zhuojun Chen.
  19.  
  20. if exists("b:current_syntax")
  21.   finish
  22. endif
  23.  
  24. setlocal iskeyword=@,48-57,_,.
  25.  
  26. if exists("g:r_syntax_folding")
  27.   setlocal foldmethod=syntax
  28. endif
  29.  
  30. syn case match
  31.  
  32. " Comment
  33. syn match rComment contains=@Spell "\#.*"
  34.  
  35. if &filetype == "rhelp"
  36.   " string enclosed in double quotes
  37.   syn region rString contains=rSpecial,@Spell start=/"/ skip=/\\\\\|\\"/ end=/"/
  38.   " string enclosed in single quotes
  39.   syn region rString contains=rSpecial,@Spell start=/'/ skip=/\\\\\|\\'/ end=/'/
  40. else
  41.   " string enclosed in double quotes
  42.   syn region rString contains=rSpecial,rStrError,@Spell start=/"/ skip=/\\\\\|\\"/ end=/"/
  43.   " string enclosed in single quotes
  44.   syn region rString contains=rSpecial,rStrError,@Spell start=/'/ skip=/\\\\\|\\'/ end=/'/
  45. endif
  46.  
  47. syn match rStrError display contained "\\."
  48.  
  49.  
  50. " New line, carriage return, tab, backspace, bell, feed, vertical tab, backslash
  51. syn match rSpecial display contained "\\\(n\|r\|t\|b\|a\|f\|v\|'\|\"\)\|\\\\"
  52.  
  53. " Hexadecimal and Octal digits
  54. syn match rSpecial display contained "\\\(x\x\{1,2}\|[0-8]\{1,3}\)"
  55.  
  56. " Unicode characters
  57. syn match rSpecial display contained "\\u\x\{1,4}"
  58. syn match rSpecial display contained "\\U\x\{1,8}"
  59. syn match rSpecial display contained "\\u{\x\{1,4}}"
  60. syn match rSpecial display contained "\\U{\x\{1,8}}"
  61.  
  62. " Statement
  63. syn keyword rStatement   break next return
  64. syn keyword rConditional if else
  65. syn keyword rRepeat      for in repeat while
  66.  
  67. " Constant (not really)
  68. syn keyword rConstant T F LETTERS letters month.ab month.name pi
  69. syn keyword rConstant R.version.string
  70.  
  71. syn keyword rNumber   NA_integer_ NA_real_ NA_complex_ NA_character_ 
  72.  
  73. " Constants
  74. syn keyword rConstant NULL
  75. syn keyword rBoolean  FALSE TRUE
  76. syn keyword rNumber   NA Inf NaN 
  77.  
  78. " integer
  79. syn match rInteger "\<\d\+L"
  80. syn match rInteger "\<0x\([0-9]\|[a-f]\|[A-F]\)\+L"
  81. syn match rInteger "\<\d\+[Ee]+\=\d\+L"
  82.  
  83. " number with no fractional part or exponent
  84. syn match rNumber "\<\d\+\>"
  85. " hexadecimal number 
  86. syn match rNumber "\<0x\([0-9]\|[a-f]\|[A-F]\)\+"
  87.  
  88. " floating point number with integer and fractional parts and optional exponent
  89. syn match rFloat "\<\d\+\.\d*\([Ee][-+]\=\d\+\)\="
  90. " floating point number with no integer part and optional exponent
  91. syn match rFloat "\<\.\d\+\([Ee][-+]\=\d\+\)\="
  92. " floating point number with no fractional part and optional exponent
  93. syn match rFloat "\<\d\+[Ee][-+]\=\d\+"
  94.  
  95. " complex number
  96. syn match rComplex "\<\d\+i"
  97. syn match rComplex "\<\d\++\d\+i"
  98. syn match rComplex "\<0x\([0-9]\|[a-f]\|[A-F]\)\+i"
  99. syn match rComplex "\<\d\+\.\d*\([Ee][-+]\=\d\+\)\=i"
  100. syn match rComplex "\<\.\d\+\([Ee][-+]\=\d\+\)\=i"
  101. syn match rComplex "\<\d\+[Ee][-+]\=\d\+i"
  102.  
  103. syn match rOperator    "&"
  104. syn match rOperator    '-'
  105. syn match rOperator    '*'
  106. syn match rOperator    '+'
  107. syn match rOperator    '='
  108. syn match rOperator    "[|!<>^~`/:@]"
  109. syn match rOperator    "%\{2}\|%\*%\|%\/%\|%in%\|%o%\|%x%"
  110. syn match rOpError  '*\{3}'
  111. syn match rOpError  '//'
  112. syn match rOpError  '&&&'
  113. syn match rOpError  '|||'
  114. syn match rOpError  '<<'
  115. syn match rOpError  '>>'
  116.  
  117. syn match rArrow "<\{1,2}-"
  118. syn match rArrow "->\{1,2}"
  119.  
  120. " Special
  121. syn match rDelimiter "[,;:]"
  122.  
  123. " Error
  124. if exists("g:r_syntax_folding")
  125.   syn region rRegion matchgroup=Delimiter start=/(/ matchgroup=Delimiter end=/)/ transparent contains=ALLBUT,rError,rBraceError,rCurlyError fold
  126.   syn region rRegion matchgroup=Delimiter start=/{/ matchgroup=Delimiter end=/}/ transparent contains=ALLBUT,rError,rBraceError,rParenError fold
  127.   syn region rRegion matchgroup=Delimiter start=/\[/ matchgroup=Delimiter end=/]/ transparent contains=ALLBUT,rError,rCurlyError,rParenError fold
  128. else
  129.   syn region rRegion matchgroup=Delimiter start=/(/ matchgroup=Delimiter end=/)/ transparent contains=ALLBUT,rError,rBraceError,rCurlyError
  130.   syn region rRegion matchgroup=Delimiter start=/{/ matchgroup=Delimiter end=/}/ transparent contains=ALLBUT,rError,rBraceError,rParenError
  131.   syn region rRegion matchgroup=Delimiter start=/\[/ matchgroup=Delimiter end=/]/ transparent contains=ALLBUT,rError,rCurlyError,rParenError
  132. endif
  133.  
  134. syn match rError      "[)\]}]"
  135. syn match rBraceError "[)}]" contained
  136. syn match rCurlyError "[)\]]" contained
  137. syn match rParenError "[\]}]" contained
  138.  
  139. " Source list of R functions. The list is produced by the Vim-R-plugin
  140. " http://www.vim.org/scripts/script.php?script_id=2628
  141. runtime r-plugin/functions.vim
  142.  
  143. syn match rDollar display contained "\$"
  144.  
  145. " List elements will not be highlighted as functions:
  146. syn match rLstElmt "\$[a-zA-Z0-9\\._]*" contains=rDollar
  147.  
  148. " Functions that may add new objects
  149. syn keyword rPreProc     library require attach detach source
  150.  
  151. if &filetype == "rhelp"
  152.     syn match rHelpIdent '\\method'
  153.     syn match rHelpIdent '\\S4method'
  154. endif
  155.  
  156. " Type
  157. syn keyword rType array category character complex double function integer list logical matrix numeric vector data.frame 
  158.  
  159. " Name of object with spaces
  160. syn region rNameWSpace start="`" end="`"
  161.  
  162. if &filetype == "rhelp"
  163.   syn match rhPreProc "^#ifdef.*" 
  164.   syn match rhPreProc "^#endif.*" 
  165.   syn match rhSection "\\dontrun\>"
  166. endif
  167.  
  168. " Define the default highlighting.
  169. hi def link rArrow       Statement    
  170. hi def link rBoolean     Boolean
  171. hi def link rBraceError  Error
  172. hi def link rComment     Comment
  173. hi def link rComplex     Number
  174. hi def link rConditional Conditional
  175. hi def link rConstant    Constant
  176. hi def link rCurlyError  Error
  177. hi def link rDelimiter   Delimiter
  178. hi def link rDollar      SpecialChar
  179. hi def link rError       Error
  180. hi def link rFloat       Float
  181. hi def link rFunction    Function
  182. hi def link rHelpIdent   Identifier
  183. hi def link rhPreProc    PreProc
  184. hi def link rhSection    PreCondit
  185. hi def link rInteger     Number
  186. hi def link rLstElmt     Normal
  187. hi def link rNameWSpace  Normal
  188. hi def link rNumber      Number
  189. hi def link rOperator    Operator
  190. hi def link rOpError     Error
  191. hi def link rParenError  Error
  192. hi def link rPreProc     PreProc
  193. hi def link rRepeat      Repeat
  194. hi def link rSpecial     SpecialChar
  195. hi def link rStatement   Statement
  196. hi def link rString      String
  197. hi def link rStrError    Error
  198. hi def link rType        Type
  199.  
  200. let b:current_syntax="r"
  201.  
  202. " vim: ts=8 sw=2
  203.