1<lexer>
2 <config>
3 <name>R</name>
4 <alias>splus</alias>
5 <alias>s</alias>
6 <alias>r</alias>
7 <filename>*.S</filename>
8 <filename>*.R</filename>
9 <filename>*.r</filename>
10 <filename>.Rhistory</filename>
11 <filename>.Rprofile</filename>
12 <filename>.Renviron</filename>
13 <mime_type>text/S-plus</mime_type>
14 <mime_type>text/S</mime_type>
15 <mime_type>text/x-r-source</mime_type>
16 <mime_type>text/x-r</mime_type>
17 <mime_type>text/x-R</mime_type>
18 <mime_type>text/x-r-history</mime_type>
19 <mime_type>text/x-r-profile</mime_type>
20 <priority>0.1</priority> <!-- higher priority than Rebol -->
21 </config>
22 <rules>
23 <state name="numbers">
24 <rule pattern="0[xX][a-fA-F0-9]+([pP][0-9]+)?[Li]?">
25 <token type="LiteralNumberHex"/>
26 </rule>
27 <rule pattern="[+-]?([0-9]+(\.[0-9]+)?|\.[0-9]+|\.)([eE][+-]?[0-9]+)?[Li]?">
28 <token type="LiteralNumber"/>
29 </rule>
30 </state>
31 <state name="operators">
32 <rule pattern="<<?-|->>?|-|==|<=|>=|<|>|&&?|!=|\|\|?|\?">
33 <token type="Operator"/>
34 </rule>
35 <rule pattern="\*|\+|\^|/|!|%[^%]*%|=|~|\$|@|:{1,3}">
36 <token type="Operator"/>
37 </rule>
38 </state>
39 <state name="root">
40 <rule>
41 <include state="keywords"/>
42 </rule>
43 <rule pattern="((?:`[^`\\]*(?:\\.[^`\\]*)*`)|(?:(?:[a-zA-z]|[_.][^0-9])[\w_.]*))\s*(?=\()">
44 <token type="NameFunction"/>
45 </rule>
46 <rule>
47 <include state="statements"/>
48 </rule>
49 <rule pattern="\{|\}">
50 <token type="Punctuation"/>
51 </rule>
52 <rule pattern=".">
53 <token type="Text"/>
54 </rule>
55 </state>
56 <state name="valid_name">
57 <rule pattern="(?:`[^`\\]*(?:\\.[^`\\]*)*`)|(?:(?:[a-zA-z]|[_.][^0-9])[\w_.]*)">
58 <token type="Name"/>
59 </rule>
60 </state>
61 <state name="keywords">
62 <rule pattern="(if|else|for|while|repeat|in|next|break|return|switch|function)(?![\w.])">
63 <token type="KeywordReserved"/>
64 </rule>
65 </state>
66 <state name="builtin_symbols">
67 <rule pattern="(NULL|NA(_(integer|real|complex|character)_)?|letters|LETTERS|Inf|TRUE|FALSE|NaN|pi|\.\.(\.|[0-9]+))(?![\w.])">
68 <token type="KeywordConstant"/>
69 </rule>
70 <rule pattern="(T|F)\b">
71 <token type="NameBuiltinPseudo"/>
72 </rule>
73 </state>
74 <state name="string_squote">
75 <rule pattern="([^\'\\]|\\.)*\'">
76 <token type="LiteralString"/>
77 <pop depth="1"/>
78 </rule>
79 </state>
80 <state name="comments">
81 <rule pattern="#.*$">
82 <token type="CommentSingle"/>
83 </rule>
84 </state>
85 <state name="punctuation">
86 <rule pattern="\[{1,2}|\]{1,2}|\(|\)|;|,">
87 <token type="Punctuation"/>
88 </rule>
89 </state>
90 <state name="statements">
91 <rule>
92 <include state="comments"/>
93 </rule>
94 <rule pattern="\s+">
95 <token type="Text"/>
96 </rule>
97 <rule pattern="\'">
98 <token type="LiteralString"/>
99 <push state="string_squote"/>
100 </rule>
101 <rule pattern="\"">
102 <token type="LiteralString"/>
103 <push state="string_dquote"/>
104 </rule>
105 <rule>
106 <include state="builtin_symbols"/>
107 </rule>
108 <rule>
109 <include state="valid_name"/>
110 </rule>
111 <rule>
112 <include state="numbers"/>
113 </rule>
114 <rule>
115 <include state="punctuation"/>
116 </rule>
117 <rule>
118 <include state="operators"/>
119 </rule>
120 </state>
121 <state name="string_dquote">
122 <rule pattern="([^"\\]|\\.)*"">
123 <token type="LiteralString"/>
124 <pop depth="1"/>
125 </rule>
126 </state>
127 </rules>
128</lexer>