| Bram Moolenaar | 071d427 | 2004-06-13 20:20:40 +0000 | [diff] [blame] | 1 | " Vim syntax file |
| 2 | " Language: RPL/2 |
| 3 | " Version: 0.15.15 against RPL/2 version 4.00pre7i |
| 4 | " Last Change: 2003 august 24 |
| 5 | " Maintainer: Joël BERTRAND <rpl2@free.fr> |
| 6 | " URL: http://www.makalis.fr/~bertrand/rpl2/download/vim/indent/rpl.vim |
| 7 | " Credits: Nothing |
| 8 | |
| 9 | " For version 5.x: Clear all syntax items |
| 10 | " For version 6.x: Quit when a syntax file was already loaded |
| 11 | if version < 600 |
| 12 | syntax clear |
| 13 | elseif exists("b:current_syntax") |
| 14 | finish |
| 15 | endif |
| 16 | |
| 17 | " Keyword characters (not used) |
| 18 | " set iskeyword=33-127 |
| 19 | |
| 20 | " Case sensitive |
| 21 | syntax case match |
| 22 | |
| 23 | " Constants |
| 24 | syntax match rplConstant "\(^\|\s\+\)\(e\|i\)\ze\($\|\s\+\)" |
| 25 | |
| 26 | " Any binary number |
| 27 | syntax match rplBinaryError "\(^\|\s\+\)#\s*\S\+b\ze" |
| 28 | syntax match rplBinary "\(^\|\s\+\)#\s*[01]\+b\ze\($\|\s\+\)" |
| 29 | syntax match rplOctalError "\(^\|\s\+\)#\s*\S\+o\ze" |
| 30 | syntax match rplOctal "\(^\|\s\+\)#\s*\o\+o\ze\($\|\s\+\)" |
| 31 | syntax match rplDecimalError "\(^\|\s\+\)#\s*\S\+d\ze" |
| 32 | syntax match rplDecimal "\(^\|\s\+\)#\s*\d\+d\ze\($\|\s\+\)" |
| 33 | syntax match rplHexadecimalError "\(^\|\s\+\)#\s*\S\+h\ze" |
| 34 | syntax match rplHexadecimal "\(^\|\s\+\)#\s*\x\+h\ze\($\|\s\+\)" |
| 35 | |
| 36 | " Case unsensitive |
| 37 | syntax case ignore |
| 38 | |
| 39 | syntax match rplControl "\(^\|\s\+\)abort\ze\($\|\s\+\)" |
| 40 | syntax match rplControl "\(^\|\s\+\)kill\ze\($\|\s\+\)" |
| 41 | syntax match rplControl "\(^\|\s\+\)cont\ze\($\|\s\+\)" |
| 42 | syntax match rplControl "\(^\|\s\+\)halt\ze\($\|\s\+\)" |
| 43 | syntax match rplControl "\(^\|\s\+\)cmlf\ze\($\|\s\+\)" |
| 44 | syntax match rplControl "\(^\|\s\+\)sst\ze\($\|\s\+\)" |
| 45 | |
| 46 | syntax match rplConstant "\(^\|\s\+\)pi\ze\($\|\s\+\)" |
| 47 | |
| 48 | syntax match rplStatement "\(^\|\s\+\)return\ze\($\|\s\+\)" |
| 49 | syntax match rplStatement "\(^\|\s\+\)last\ze\($\|\s\+\)" |
| 50 | syntax match rplStatement "\(^\|\s\+\)syzeval\ze\($\|\s\+\)" |
| 51 | syntax match rplStatement "\(^\|\s\+\)wait\ze\($\|\s\+\)" |
| 52 | syntax match rplStatement "\(^\|\s\+\)type\ze\($\|\s\+\)" |
| 53 | syntax match rplStatement "\(^\|\s\+\)kind\ze\($\|\s\+\)" |
| 54 | syntax match rplStatement "\(^\|\s\+\)eval\ze\($\|\s\+\)" |
| 55 | syntax match rplStatement "\(^\|\s\+\)use\ze\($\|\s\+\)" |
| 56 | syntax match rplStatement "\(^\|\s\+\)remove\ze\($\|\s\+\)" |
| 57 | syntax match rplStatement "\(^\|\s\+\)external\ze\($\|\s\+\)" |
| 58 | syntax match rplStatement "\(^\|\s\+\)dup\([2n]\|\)\ze\($\|\s\+\)" |
| 59 | syntax match rplStatement "\(^\|\s\+\)drop\([2n]\|\)\ze\($\|\s\+\)" |
| 60 | syntax match rplStatement "\(^\|\s\+\)depth\ze\($\|\s\+\)" |
| 61 | syntax match rplStatement "\(^\|\s\+\)roll\(d\|\)\ze\($\|\s\+\)" |
| 62 | syntax match rplStatement "\(^\|\s\+\)pick\ze\($\|\s\+\)" |
| 63 | syntax match rplStatement "\(^\|\s\+\)rot\ze\($\|\s\+\)" |
| 64 | syntax match rplStatement "\(^\|\s\+\)swap\ze\($\|\s\+\)" |
| 65 | syntax match rplStatement "\(^\|\s\+\)over\ze\($\|\s\+\)" |
| 66 | syntax match rplStatement "\(^\|\s\+\)clear\ze\($\|\s\+\)" |
| 67 | syntax match rplStatement "\(^\|\s\+\)warranty\ze\($\|\s\+\)" |
| 68 | syntax match rplStatement "\(^\|\s\+\)copyright\ze\($\|\s\+\)" |
| 69 | syntax match rplStatement "\(^\|\s\+\)convert\ze\($\|\s\+\)" |
| 70 | syntax match rplStatement "\(^\|\s\+\)date\ze\($\|\s\+\)" |
| 71 | syntax match rplStatement "\(^\|\s\+\)time\ze\($\|\s\+\)" |
| 72 | syntax match rplStatement "\(^\|\s\+\)mem\ze\($\|\s\+\)" |
| 73 | syntax match rplStatement "\(^\|\s\+\)clmf\ze\($\|\s\+\)" |
| 74 | syntax match rplStatement "\(^\|\s\+\)->num\ze\($\|\s\+\)" |
| 75 | syntax match rplStatement "\(^\|\s\+\)help\ze\($\|\s\+\)" |
| 76 | |
| 77 | syntax match rplStorage "\(^\|\s\+\)get\(i\|r\|c\|\)\ze\($\|\s\+\)" |
| 78 | syntax match rplStorage "\(^\|\s\+\)put\(i\|r\|c\|\)\ze\($\|\s\+\)" |
| 79 | syntax match rplStorage "\(^\|\s\+\)rcl\ze\($\|\s\+\)" |
| 80 | syntax match rplStorage "\(^\|\s\+\)purge\ze\($\|\s\+\)" |
| 81 | syntax match rplStorage "\(^\|\s\+\)sinv\ze\($\|\s\+\)" |
| 82 | syntax match rplStorage "\(^\|\s\+\)sneg\ze\($\|\s\+\)" |
| 83 | syntax match rplStorage "\(^\|\s\+\)sconj\ze\($\|\s\+\)" |
| 84 | syntax match rplStorage "\(^\|\s\+\)steq\ze\($\|\s\+\)" |
| 85 | syntax match rplStorage "\(^\|\s\+\)rceq\ze\($\|\s\+\)" |
| 86 | syntax match rplStorage "\(^\|\s\+\)vars\ze\($\|\s\+\)" |
| 87 | syntax match rplStorage "\(^\|\s\+\)clusr\ze\($\|\s\+\)" |
| 88 | syntax match rplStorage "\(^\|\s\+\)sto\([+-/\*]\|\)\ze\($\|\s\+\)" |
| 89 | |
| 90 | syntax match rplAlgConditional "\(^\|\s\+\)ift\(e\|\)\ze\($\|\s\+\)" |
| 91 | |
| 92 | syntax match rplOperator "\(^\|\s\+\)and\ze\($\|\s\+\)" |
| 93 | syntax match rplOperator "\(^\|\s\+\)\(x\|\)or\ze\($\|\s\+\)" |
| 94 | syntax match rplOperator "\(^\|\s\+\)not\ze\($\|\s\+\)" |
| 95 | syntax match rplOperator "\(^\|\s\+\)same\ze\($\|\s\+\)" |
| 96 | syntax match rplOperator "\(^\|\s\+\)==\ze\($\|\s\+\)" |
| 97 | syntax match rplOperator "\(^\|\s\+\)<=\ze\($\|\s\+\)" |
| 98 | syntax match rplOperator "\(^\|\s\+\)=<\ze\($\|\s\+\)" |
| 99 | syntax match rplOperator "\(^\|\s\+\)=>\ze\($\|\s\+\)" |
| 100 | syntax match rplOperator "\(^\|\s\+\)>=\ze\($\|\s\+\)" |
| 101 | syntax match rplOperator "\(^\|\s\+\)<>\ze\($\|\s\+\)" |
| 102 | syntax match rplOperator "\(^\|\s\+\)>\ze\($\|\s\+\)" |
| 103 | syntax match rplOperator "\(^\|\s\+\)<\ze\($\|\s\+\)" |
| 104 | syntax match rplOperator "\(^\|\s\+\)[+-]\ze\($\|\s\+\)" |
| 105 | syntax match rplOperator "\(^\|\s\+\)[/\*]\ze\($\|\s\+\)" |
| 106 | syntax match rplOperator "\(^\|\s\+\)\^\ze\($\|\s\+\)" |
| 107 | syntax match rplOperator "\(^\|\s\+\)\*\*\ze\($\|\s\+\)" |
| 108 | |
| 109 | syntax match rplBoolean "\(^\|\s\+\)true\ze\($\|\s\+\)" |
| 110 | syntax match rplBoolean "\(^\|\s\+\)false\ze\($\|\s\+\)" |
| 111 | |
| 112 | syntax match rplReadWrite "\(^\|\s\+\)store\ze\($\|\s\+\)" |
| 113 | syntax match rplReadWrite "\(^\|\s\+\)recall\ze\($\|\s\+\)" |
| 114 | syntax match rplReadWrite "\(^\|\s\+\)\(\|wf\|un\)lock\ze\($\|\s\+\)" |
| 115 | syntax match rplReadWrite "\(^\|\s\+\)open\ze\($\|\s\+\)" |
| 116 | syntax match rplReadWrite "\(^\|\s\+\)close\ze\($\|\s\+\)" |
| 117 | syntax match rplReadWrite "\(^\|\s\+\)delete\ze\($\|\s\+\)" |
| 118 | syntax match rplReadWrite "\(^\|\s\+\)create\ze\($\|\s\+\)" |
| 119 | syntax match rplReadWrite "\(^\|\s\+\)format\ze\($\|\s\+\)" |
| 120 | syntax match rplReadWrite "\(^\|\s\+\)rewind\ze\($\|\s\+\)" |
| 121 | syntax match rplReadWrite "\(^\|\s\+\)backspace\ze\($\|\s\+\)" |
| 122 | syntax match rplReadWrite "\(^\|\s\+\)\(\|re\)write\ze\($\|\s\+\)" |
| 123 | syntax match rplReadWrite "\(^\|\s\+\)read\ze\($\|\s\+\)" |
| 124 | syntax match rplReadWrite "\(^\|\s\+\)inquire\ze\($\|\s\+\)" |
| 125 | syntax match rplReadWrite "\(^\|\s\+\)sync\ze\($\|\s\+\)" |
| 126 | syntax match rplReadWrite "\(^\|\s\+\)append\ze\($\|\s\+\)" |
| 127 | syntax match rplReadWrite "\(^\|\s\+\)suppress\ze\($\|\s\+\)" |
| 128 | syntax match rplReadWrite "\(^\|\s\+\)seek\ze\($\|\s\+\)" |
| 129 | syntax match rplReadWrite "\(^\|\s\+\)pr\(1\|int\|st\|stc\|lcd\|var\|usr\|md\)\ze\($\|\s\+\)" |
| 130 | syntax match rplReadWrite "\(^\|\s\+\)paper\ze\($\|\s\+\)" |
| 131 | syntax match rplReadWrite "\(^\|\s\+\)cr\($\|\s\+\)" |
| 132 | syntax match rplReadWrite "\(^\|\s\+\)erase\ze\($\|\s\+\)" |
| 133 | syntax match rplReadWrite "\(^\|\s\+\)disp\ze\($\|\s\+\)" |
| 134 | syntax match rplReadWrite "\(^\|\s\+\)input\ze\($\|\s\+\)" |
| 135 | syntax match rplReadWrite "\(^\|\s\+\)prompt\ze\($\|\s\+\)" |
| 136 | syntax match rplReadWrite "\(^\|\s\+\)key\ze\($\|\s\+\)" |
| 137 | syntax match rplReadWrite "\(^\|\s\+\)cllcd\ze\($\|\s\+\)" |
| 138 | syntax match rplReadWrite "\(^\|\s\+\)\(\|re\)draw\ze\($\|\s\+\)" |
| 139 | syntax match rplReadWrite "\(^\|\s\+\)drax\ze\($\|\s\+\)" |
| 140 | syntax match rplReadWrite "\(^\|\s\+\)indep\ze\($\|\s\+\)" |
| 141 | syntax match rplReadWrite "\(^\|\s\+\)depnd\ze\($\|\s\+\)" |
| 142 | syntax match rplReadWrite "\(^\|\s\+\)res\ze\($\|\s\+\)" |
| 143 | syntax match rplReadWrite "\(^\|\s\+\)axes\ze\($\|\s\+\)" |
| 144 | syntax match rplReadWrite "\(^\|\s\+\)label\ze\($\|\s\+\)" |
| 145 | syntax match rplReadWrite "\(^\|\s\+\)pmin\ze\($\|\s\+\)" |
| 146 | syntax match rplReadWrite "\(^\|\s\+\)pmax\ze\($\|\s\+\)" |
| 147 | syntax match rplReadWrite "\(^\|\s\+\)centr\ze\($\|\s\+\)" |
| 148 | syntax match rplReadWrite "\(^\|\s\+\)persist\ze\($\|\s\+\)" |
| 149 | syntax match rplReadWrite "\(^\|\s\+\)title\ze\($\|\s\+\)" |
| 150 | syntax match rplReadWrite "\(^\|\s\+\)\(slice\|auto\|log\|\)scale\ze\($\|\s\+\)" |
| 151 | syntax match rplReadWrite "\(^\|\s\+\)eyept\ze\($\|\s\+\)" |
| 152 | syntax match rplReadWrite "\(^\|\s\+\)\(p\|s\)par\ze\($\|\s\+\)" |
| 153 | syntax match rplReadWrite "\(^\|\s\+\)function\ze\($\|\s\+\)" |
| 154 | syntax match rplReadWrite "\(^\|\s\+\)polar\ze\($\|\s\+\)" |
| 155 | syntax match rplReadWrite "\(^\|\s\+\)scatter\ze\($\|\s\+\)" |
| 156 | syntax match rplReadWrite "\(^\|\s\+\)plotter\ze\($\|\s\+\)" |
| 157 | syntax match rplReadWrite "\(^\|\s\+\)wireframe\ze\($\|\s\+\)" |
| 158 | syntax match rplReadWrite "\(^\|\s\+\)parametric\ze\($\|\s\+\)" |
| 159 | syntax match rplReadWrite "\(^\|\s\+\)slice\ze\($\|\s\+\)" |
| 160 | syntax match rplReadWrite "\(^\|\s\+\)\*w\ze\($\|\s\+\)" |
| 161 | syntax match rplReadWrite "\(^\|\s\+\)\*h\ze\($\|\s\+\)" |
| 162 | syntax match rplReadWrite "\(^\|\s\+\)\*d\ze\($\|\s\+\)" |
| 163 | syntax match rplReadWrite "\(^\|\s\+\)\*s\ze\($\|\s\+\)" |
| 164 | syntax match rplReadWrite "\(^\|\s\+\)->lcd\ze\($\|\s\+\)" |
| 165 | syntax match rplReadWrite "\(^\|\s\+\)lcd->\ze\($\|\s\+\)" |
| 166 | syntax match rplReadWrite "\(^\|\s\+\)edit\ze\($\|\s\+\)" |
| 167 | syntax match rplReadWrite "\(^\|\s\+\)visit\ze\($\|\s\+\)" |
| 168 | |
| 169 | syntax match rplIntrinsic "\(^\|\s\+\)abs\ze\($\|\s\+\)" |
| 170 | syntax match rplIntrinsic "\(^\|\s\+\)arg\ze\($\|\s\+\)" |
| 171 | syntax match rplIntrinsic "\(^\|\s\+\)conj\ze\($\|\s\+\)" |
| 172 | syntax match rplIntrinsic "\(^\|\s\+\)re\ze\($\|\s\+\)" |
| 173 | syntax match rplIntrinsic "\(^\|\s\+\)im\ze\($\|\s\+\)" |
| 174 | syntax match rplIntrinsic "\(^\|\s\+\)mant\ze\($\|\s\+\)" |
| 175 | syntax match rplIntrinsic "\(^\|\s\+\)xpon\ze\($\|\s\+\)" |
| 176 | syntax match rplIntrinsic "\(^\|\s\+\)ceil\ze\($\|\s\+\)" |
| 177 | syntax match rplIntrinsic "\(^\|\s\+\)fact\ze\($\|\s\+\)" |
| 178 | syntax match rplIntrinsic "\(^\|\s\+\)fp\ze\($\|\s\+\)" |
| 179 | syntax match rplIntrinsic "\(^\|\s\+\)floor\ze\($\|\s\+\)" |
| 180 | syntax match rplIntrinsic "\(^\|\s\+\)inv\ze\($\|\s\+\)" |
| 181 | syntax match rplIntrinsic "\(^\|\s\+\)ip\ze\($\|\s\+\)" |
| 182 | syntax match rplIntrinsic "\(^\|\s\+\)max\ze\($\|\s\+\)" |
| 183 | syntax match rplIntrinsic "\(^\|\s\+\)min\ze\($\|\s\+\)" |
| 184 | syntax match rplIntrinsic "\(^\|\s\+\)mod\ze\($\|\s\+\)" |
| 185 | syntax match rplIntrinsic "\(^\|\s\+\)neg\ze\($\|\s\+\)" |
| 186 | syntax match rplIntrinsic "\(^\|\s\+\)relax\ze\($\|\s\+\)" |
| 187 | syntax match rplIntrinsic "\(^\|\s\+\)sign\ze\($\|\s\+\)" |
| 188 | syntax match rplIntrinsic "\(^\|\s\+\)sq\(\|rt\)\ze\($\|\s\+\)" |
| 189 | syntax match rplIntrinsic "\(^\|\s\+\)xroot\ze\($\|\s\+\)" |
| 190 | syntax match rplIntrinsic "\(^\|\s\+\)cos\ze\($\|\s\+\)" |
| 191 | syntax match rplIntrinsic "\(^\|\s\+\)sin\ze\($\|\s\+\)" |
| 192 | syntax match rplIntrinsic "\(^\|\s\+\)tan\ze\($\|\s\+\)" |
| 193 | syntax match rplIntrinsic "\(^\|\s\+\)tg\ze\($\|\s\+\)" |
| 194 | syntax match rplIntrinsic "\(^\|\s\+\)a\(\|rc\)cos\ze\($\|\s\+\)" |
| 195 | syntax match rplIntrinsic "\(^\|\s\+\)a\(\|rc\)sin\ze\($\|\s\+\)" |
| 196 | syntax match rplIntrinsic "\(^\|\s\+\)atan\ze\($\|\s\+\)" |
| 197 | syntax match rplIntrinsic "\(^\|\s\+\)arctg\ze\($\|\s\+\)" |
| 198 | syntax match rplIntrinsic "\(^\|\s\+\)\(\|a\)cosh\ze\($\|\s\+\)" |
| 199 | syntax match rplIntrinsic "\(^\|\s\+\)\(\|a\)sinh\ze\($\|\s\+\)" |
| 200 | syntax match rplIntrinsic "\(^\|\s\+\)\(\|a\)tanh\ze\($\|\s\+\)" |
| 201 | syntax match rplIntrinsic "\(^\|\s\+\)\(\|arg\)th\ze\($\|\s\+\)" |
| 202 | syntax match rplIntrinsic "\(^\|\s\+\)arg[cst]h\ze\($\|\s\+\)" |
| 203 | syntax match rplIntrinsic "\(^\|\s\+\)\(\|a\)log\ze\($\|\s\+\)" |
| 204 | syntax match rplIntrinsic "\(^\|\s\+\)ln\(\|1\)\ze\($\|\s\+\)" |
| 205 | syntax match rplIntrinsic "\(^\|\s\+\)exp\(\|m\)\ze\($\|\s\+\)" |
| 206 | syntax match rplIntrinsic "\(^\|\s\+\)trn\ze\($\|\s\+\)" |
| 207 | syntax match rplIntrinsic "\(^\|\s\+\)con\ze\($\|\s\+\)" |
| 208 | syntax match rplIntrinsic "\(^\|\s\+\)idn\ze\($\|\s\+\)" |
| 209 | syntax match rplIntrinsic "\(^\|\s\+\)rdm\ze\($\|\s\+\)" |
| 210 | syntax match rplIntrinsic "\(^\|\s\+\)rsd\ze\($\|\s\+\)" |
| 211 | syntax match rplIntrinsic "\(^\|\s\+\)cnrm\ze\($\|\s\+\)" |
| 212 | syntax match rplIntrinsic "\(^\|\s\+\)cross\ze\($\|\s\+\)" |
| 213 | syntax match rplIntrinsic "\(^\|\s\+\)d[eo]t\ze\($\|\s\+\)" |
| 214 | syntax match rplIntrinsic "\(^\|\s\+\)[cr]swp\ze\($\|\s\+\)" |
| 215 | syntax match rplIntrinsic "\(^\|\s\+\)rci\(j\|\)\ze\($\|\s\+\)" |
| 216 | syntax match rplIntrinsic "\(^\|\s\+\)\(in\|de\)cr\ze\($\|\s\+\)" |
| 217 | syntax match rplIntrinsic "\(^\|\s\+\)bessel\ze\($\|\s\+\)" |
| 218 | |
| 219 | syntax match rplIntrinsic "\(^\|\s\+\)\(\|g\)egvl\ze\($\|\s\+\)" |
| 220 | syntax match rplIntrinsic "\(^\|\s\+\)\(\|g\)\(\|l\|r\)egv\ze\($\|\s\+\)" |
| 221 | syntax match rplIntrinsic "\(^\|\s\+\)rnrm\ze\($\|\s\+\)" |
| 222 | syntax match rplIntrinsic "\(^\|\s\+\)\(std\|fix\|sci\|eng\)\ze\($\|\s\+\)" |
| 223 | syntax match rplIntrinsic "\(^\|\s\+\)\(rad\|deg\)\ze\($\|\s\+\)" |
| 224 | syntax match rplIntrinsic "\(^\|\s\+\)\(\|n\)rand\ze\($\|\s\+\)" |
| 225 | syntax match rplIntrinsic "\(^\|\s\+\)rdz\ze\($\|\s\+\)" |
| 226 | syntax match rplIntrinsic "\(^\|\s\+\)\(\|i\)fft\ze\($\|\s\+\)" |
| 227 | syntax match rplIntrinsic "\(^\|\s\+\)\(dec\|bin\|oct\|hex\)\ze\($\|\s\+\)" |
| 228 | syntax match rplIntrinsic "\(^\|\s\+\)rclf\ze\($\|\s\+\)" |
| 229 | syntax match rplIntrinsic "\(^\|\s\+\)stof\ze\($\|\s\+\)" |
| 230 | syntax match rplIntrinsic "\(^\|\s\+\)[cs]f\ze\($\|\s\+\)" |
| 231 | syntax match rplIntrinsic "\(^\|\s\+\)chr\ze\($\|\s\+\)" |
| 232 | syntax match rplIntrinsic "\(^\|\s\+\)num\ze\($\|\s\+\)" |
| 233 | syntax match rplIntrinsic "\(^\|\s\+\)pos\ze\($\|\s\+\)" |
| 234 | syntax match rplIntrinsic "\(^\|\s\+\)sub\ze\($\|\s\+\)" |
| 235 | syntax match rplIntrinsic "\(^\|\s\+\)size\ze\($\|\s\+\)" |
| 236 | syntax match rplIntrinsic "\(^\|\s\+\)\(st\|rc\)ws\ze\($\|\s\+\)" |
| 237 | syntax match rplIntrinsic "\(^\|\s\+\)\(r\|s\)\(r\|l\)\(\|b\)\ze\($\|\s\+\)" |
| 238 | syntax match rplIntrinsic "\(^\|\s\+\)as\(r\|l\)\ze\($\|\s\+\)" |
| 239 | syntax match rplIntrinsic "\(^\|\s\+\)\(int\|der\)\ze\($\|\s\+\)" |
| 240 | syntax match rplIntrinsic "\(^\|\s\+\)stos\ze\($\|\s\+\)" |
| 241 | syntax match rplIntrinsic "\(^\|\s\+\)\(\|r\)cls\ze\($\|\s\+\)" |
| 242 | syntax match rplIntrinsic "\(^\|\s\+\)drws\ze\($\|\s\+\)" |
| 243 | syntax match rplIntrinsic "\(^\|\s\+\)scls\ze\($\|\s\+\)" |
| 244 | syntax match rplIntrinsic "\(^\|\s\+\)ns\ze\($\|\s\+\)" |
| 245 | syntax match rplIntrinsic "\(^\|\s\+\)tot\ze\($\|\s\+\)" |
| 246 | syntax match rplIntrinsic "\(^\|\s\+\)mean\ze\($\|\s\+\)" |
| 247 | syntax match rplIntrinsic "\(^\|\s\+\)\(\|p\)sdev\ze\($\|\s\+\)" |
| 248 | syntax match rplIntrinsic "\(^\|\s\+\)\(\|p\)var\ze\($\|\s\+\)" |
| 249 | syntax match rplIntrinsic "\(^\|\s\+\)maxs\ze\($\|\s\+\)" |
| 250 | syntax match rplIntrinsic "\(^\|\s\+\)mins\ze\($\|\s\+\)" |
| 251 | syntax match rplIntrinsic "\(^\|\s\+\)\(\|p\)cov\ze\($\|\s\+\)" |
| 252 | syntax match rplIntrinsic "\(^\|\s\+\)cols\ze\($\|\s\+\)" |
| 253 | syntax match rplIntrinsic "\(^\|\s\+\)s\(x\(\|y\|2\)\|y\(\|2\)\)\ze\($\|\s\+\)" |
| 254 | syntax match rplIntrinsic "\(^\|\s\+\)\(x\|y\)col\ze\($\|\s\+\)" |
| 255 | syntax match rplIntrinsic "\(^\|\s\+\)corr\ze\($\|\s\+\)" |
| 256 | syntax match rplIntrinsic "\(^\|\s\+\)utp[cfnt]\ze\($\|\s\+\)" |
| 257 | syntax match rplIntrinsic "\(^\|\s\+\)comb\ze\($\|\s\+\)" |
| 258 | syntax match rplIntrinsic "\(^\|\s\+\)perm\ze\($\|\s\+\)" |
| 259 | syntax match rplIntrinsic "\(^\|\s\+\)\(\|p\)lu\ze\($\|\s\+\)" |
| 260 | syntax match rplIntrinsic "\(^\|\s\+\)[lu]chol\ze\($\|\s\+\)" |
| 261 | syntax match rplIntrinsic "\(^\|\s\+\)schur\ze\($\|\s\+\)" |
| 262 | syntax match rplIntrinsic "\(^\|\s\+\)%\ze\($\|\s\+\)" |
| 263 | syntax match rplIntrinsic "\(^\|\s\+\)%ch\ze\($\|\s\+\)" |
| 264 | syntax match rplIntrinsic "\(^\|\s\+\)%t\ze\($\|\s\+\)" |
| 265 | syntax match rplIntrinsic "\(^\|\s\+\)hms->\ze\($\|\s\+\)" |
| 266 | syntax match rplIntrinsic "\(^\|\s\+\)->hms\ze\($\|\s\+\)" |
| 267 | syntax match rplIntrinsic "\(^\|\s\+\)hms+\ze\($\|\s\+\)" |
| 268 | syntax match rplIntrinsic "\(^\|\s\+\)hms-\ze\($\|\s\+\)" |
| 269 | syntax match rplIntrinsic "\(^\|\s\+\)d->r\ze\($\|\s\+\)" |
| 270 | syntax match rplIntrinsic "\(^\|\s\+\)r->d\ze\($\|\s\+\)" |
| 271 | syntax match rplIntrinsic "\(^\|\s\+\)b->r\ze\($\|\s\+\)" |
| 272 | syntax match rplIntrinsic "\(^\|\s\+\)r->b\ze\($\|\s\+\)" |
| 273 | syntax match rplIntrinsic "\(^\|\s\+\)c->r\ze\($\|\s\+\)" |
| 274 | syntax match rplIntrinsic "\(^\|\s\+\)r->c\ze\($\|\s\+\)" |
| 275 | syntax match rplIntrinsic "\(^\|\s\+\)r->p\ze\($\|\s\+\)" |
| 276 | syntax match rplIntrinsic "\(^\|\s\+\)p->r\ze\($\|\s\+\)" |
| 277 | syntax match rplIntrinsic "\(^\|\s\+\)str->\ze\($\|\s\+\)" |
| 278 | syntax match rplIntrinsic "\(^\|\s\+\)->str\ze\($\|\s\+\)" |
| 279 | syntax match rplIntrinsic "\(^\|\s\+\)array->\ze\($\|\s\+\)" |
| 280 | syntax match rplIntrinsic "\(^\|\s\+\)->array\ze\($\|\s\+\)" |
| 281 | syntax match rplIntrinsic "\(^\|\s\+\)list->\ze\($\|\s\+\)" |
| 282 | syntax match rplIntrinsic "\(^\|\s\+\)->list\ze\($\|\s\+\)" |
| 283 | syntax match rplIntrinsic "\(^\|\s\+\)s+\ze\($\|\s\+\)" |
| 284 | syntax match rplIntrinsic "\(^\|\s\+\)s-\ze\($\|\s\+\)" |
| 285 | syntax match rplIntrinsic "\(^\|\s\+\)col-\ze\($\|\s\+\)" |
| 286 | syntax match rplIntrinsic "\(^\|\s\+\)col+\ze\($\|\s\+\)" |
| 287 | syntax match rplIntrinsic "\(^\|\s\+\)row-\ze\($\|\s\+\)" |
| 288 | syntax match rplIntrinsic "\(^\|\s\+\)row+\ze\($\|\s\+\)" |
| 289 | syntax match rplIntrinsic "\(^\|\s\+\)->q\ze\($\|\s\+\)" |
| 290 | |
| 291 | syntax match rplObsolete "\(^\|\s\+\)arry->\ze\($\|\s\+\)"hs=e-5 |
| 292 | syntax match rplObsolete "\(^\|\s\+\)->arry\ze\($\|\s\+\)"hs=e-5 |
| 293 | |
| 294 | " Conditional structures |
| 295 | syntax match rplConditionalError "\(^\|\s\+\)case\ze\($\|\s\+\)"hs=e-3 |
| 296 | syntax match rplConditionalError "\(^\|\s\+\)then\ze\($\|\s\+\)"hs=e-3 |
| 297 | syntax match rplConditionalError "\(^\|\s\+\)else\ze\($\|\s\+\)"hs=e-3 |
| 298 | syntax match rplConditionalError "\(^\|\s\+\)elseif\ze\($\|\s\+\)"hs=e-5 |
| 299 | syntax match rplConditionalError "\(^\|\s\+\)end\ze\($\|\s\+\)"hs=e-2 |
| 300 | syntax match rplConditionalError "\(^\|\s\+\)\(step\|next\)\ze\($\|\s\+\)"hs=e-3 |
| 301 | syntax match rplConditionalError "\(^\|\s\+\)until\ze\($\|\s\+\)"hs=e-4 |
| 302 | syntax match rplConditionalError "\(^\|\s\+\)repeat\ze\($\|\s\+\)"hs=e-5 |
| 303 | syntax match rplConditionalError "\(^\|\s\+\)default\ze\($\|\s\+\)"hs=e-6 |
| 304 | |
| 305 | " FOR/(CYCLE)/(EXIT)/NEXT |
| 306 | " FOR/(CYCLE)/(EXIT)/STEP |
| 307 | " START/(CYCLE)/(EXIT)/NEXT |
| 308 | " START/(CYCLE)/(EXIT)/STEP |
| 309 | syntax match rplCycle "\(^\|\s\+\)\(cycle\|exit\)\ze\($\|\s\+\)" |
| 310 | syntax region rplForNext matchgroup=rplRepeat start="\(^\|\s\+\)\(for\|start\)\ze\($\|\s\+\)" end="\(^\|\s\+\)\(next\|step\)\ze\($\|\s\+\)" contains=ALL keepend extend |
| 311 | |
| 312 | " ELSEIF/END |
| 313 | syntax region rplElseifEnd matchgroup=rplConditional start="\(^\|\s\+\)elseif\ze\($\|\s\+\)" end="\(^\|\s\+\)end\ze\($\|\s\+\)" contained contains=ALLBUT,rplElseEnd keepend |
| 314 | |
| 315 | " ELSE/END |
| 316 | syntax region rplElseEnd matchgroup=rplConditional start="\(^\|\s\+\)else\ze\($\|\s\+\)" end="\(^\|\s\+\)end\ze\($\|\s\+\)" contained contains=ALLBUT,rplElseEnd,rplThenEnd,rplElseifEnd keepend |
| 317 | |
| 318 | " THEN/END |
| 319 | syntax region rplThenEnd matchgroup=rplConditional start="\(^\|\s\+\)then\ze\($\|\s\+\)" end="\(^\|\s\+\)end\ze\($\|\s\+\)" contained containedin=rplIfEnd contains=ALLBUT,rplThenEnd keepend |
| 320 | |
| 321 | " IF/END |
| 322 | syntax region rplIfEnd matchgroup=rplConditional start="\(^\|\s\+\)if\(err\|\)\ze\($\|\s\+\)" end="\(^\|\s\+\)end\ze\($\|\s\+\)" contains=ALLBUT,rplElseEnd,rplElseifEnd keepend extend |
| 323 | " if end is accepted ! |
| 324 | " select end too ! |
| 325 | |
| 326 | " CASE/THEN |
| 327 | syntax region rplCaseThen matchgroup=rplConditional start="\(^\|\s\+\)case\ze\($\|\s\+\)" end="\(^\|\s\+\)then\ze\($\|\s\+\)" contains=ALLBUT,rplCaseThen,rplCaseEnd,rplThenEnd keepend extend contained containedin=rplCaseEnd |
| 328 | |
| 329 | " CASE/END |
| 330 | syntax region rplCaseEnd matchgroup=rplConditional start="\(^\|\s\+\)case\ze\($\|\s\+\)" end="\(^\|\s\+\)end\ze\($\|\s\+\)" contains=ALLBUT,rplCaseEnd,rplThenEnd,rplElseEnd keepend extend contained containedin=rplSelectEnd |
| 331 | |
| 332 | " DEFAULT/END |
| 333 | syntax region rplDefaultEnd matchgroup=rplConditional start="\(^\|\s\+\)default\ze\($\|\s\+\)" end="\(^\|\s\+\)end\ze\($\|\s\+\)" contains=ALLBUT,rplDefaultEnd keepend contained containedin=rplSelectEnd |
| 334 | |
| 335 | " SELECT/END |
| 336 | syntax region rplSelectEnd matchgroup=rplConditional start="\(^\|\s\+\)select\ze\($\|\s\+\)" end="\(^\|\s\+\)end\ze\($\|\s\+\)" contains=ALLBUT,rplThenEnd keepend extend |
| 337 | " select end is accepted ! |
| 338 | |
| 339 | " DO/UNTIL/END |
| 340 | syntax region rplUntilEnd matchgroup=rplConditional start="\(^\|\s\+\)until\ze\($\|\s\+\)" end="\(^\|\s\+\)\zsend\ze\($\|\s\+\)" contains=ALLBUT,rplUntilEnd contained containedin=rplDoUntil extend keepend |
| 341 | syntax region rplDoUntil matchgroup=rplConditional start="\(^\|\s\+\)do\ze\($\|\s\+\)" end="\(^\|\s\+\)until\ze\($\|\s\+\)" contains=ALL keepend extend |
| 342 | |
| 343 | " WHILE/REPEAT/END |
| 344 | syntax region rplRepeatEnd matchgroup=rplConditional start="\(^\|\s\+\)repeat\ze\($\|\s\+\)" end="\(^\|\s\+\)\zsend\ze\($\|\s\+\)" contains=ALLBUT,rplRepeatEnd contained containedin=rplWhileRepeat extend keepend |
| 345 | syntax region rplWhileRepeat matchgroup=rplConditional start="\(^\|\s\+\)while\ze\($\|\s\+\)" end="\(^\|\s\+\)repeat\ze\($\|\s\+\)" contains=ALL keepend extend |
| 346 | |
| 347 | " Comments |
| 348 | syntax match rplCommentError "\*/" |
| 349 | syntax region rplCommentString contained start=+"+ end=+"+ end=+\*/+me=s-1 |
| 350 | syntax region rplCommentLine start="\(^\|\s\+\)//\ze" skip="\\$" end="$" contains=NONE keepend extend |
| 351 | syntax region rplComment start="\(^\|\s\+\)/\*\ze" end="\*/" contains=rplCommentString keepend extend |
| 352 | |
| 353 | " Catch errors caused by too many right parentheses |
| 354 | syntax region rplParen transparent start="(" end=")" contains=ALLBUT,rplParenError,rplComplex,rplIncluded keepend extend |
| 355 | syntax match rplParenError ")" |
| 356 | |
| 357 | " Subroutines |
| 358 | " Catch errors caused by too many right '>>' |
| 359 | syntax match rplSubError "\(^\|\s\+\)>>\ze\($\|\s\+\)"hs=e-1 |
| 360 | syntax region rplSub matchgroup=rplSubDelimitor start="\(^\|\s\+\)<<\ze\($\|\s\+\)" end="\(^\|\s\+\)>>\ze\($\|\s\+\)" contains=ALLBUT,rplSubError,rplIncluded,rplDefaultEnd,rplStorageSub keepend extend |
| 361 | |
| 362 | " Expressions |
| 363 | syntax region rplExpr start="\(^\|\s\+\)'" end="'\ze\($\|\s\+\)" contains=rplParen,rplParenError |
| 364 | |
| 365 | " Local variables |
| 366 | syntax match rplStorageError "\(^\|\s\+\)->\ze\($\|\s\+\)"hs=e-1 |
| 367 | syntax region rplStorageSub matchgroup=rplStorage start="\(^\|\s\+\)<<\ze\($\|\s\+\)" end="\(^\|\s\+\)>>\ze\($\|\s\+\)" contains=ALLBUT,rplSubError,rplIncluded,rplDefaultEnd,rplStorageExpr contained containedin=rplLocalStorage keepend extend |
| 368 | syntax region rplStorageExpr matchgroup=rplStorage start="\(^\|\s\+\)'" end="'\ze\($\|\s\+\)" contains=rplParen,rplParenError extend contained containedin=rplLocalStorage |
| 369 | syntax region rplLocalStorage matchgroup=rplStorage start="\(^\|\s\+\)->\ze\($\|\s\+\)" end="\(^\|\s\+\)\(<<\ze\($\|\s\+\)\|'\)" contains=rplStorageSub,rplStorageExpr,rplComment,rplCommentLine keepend extend |
| 370 | |
| 371 | " Catch errors caused by too many right brackets |
| 372 | syntax match rplArrayError "\]" |
| 373 | syntax match rplArray "\]" contained containedin=rplArray |
| 374 | syntax region rplArray matchgroup=rplArray start="\[" end="\]" contains=ALLBUT,rplArrayError keepend extend |
| 375 | |
| 376 | " Catch errors caused by too many right '}' |
| 377 | syntax match rplListError "}" |
| 378 | syntax match rplList "}" contained containedin=rplList |
| 379 | syntax region rplList matchgroup=rplList start="{" end="}" contains=ALLBUT,rplListError,rplIncluded keepend extend |
| 380 | |
| 381 | " cpp is used by RPL/2 |
| 382 | syntax match rplPreProc "\_^#\s*\(define\|undef\)\>" |
| 383 | syntax match rplPreProc "\_^#\s*\(warning\|error\)\>" |
| 384 | syntax match rplPreCondit "\_^#\s*\(if\|ifdef\|ifndef\|elif\|else\|endif\)\>" |
| 385 | syntax match rplIncluded contained "\<<\s*\S*\s*>\>" |
| 386 | syntax match rplInclude "\_^#\s*include\>\s*["<]" contains=rplIncluded,rplString |
| 387 | "syntax match rplExecPath "\%^\_^#!\s*\S*" |
| 388 | syntax match rplExecPath "\%^\_^#!\p*\_$" |
| 389 | |
| 390 | " Any integer |
| 391 | syntax match rplInteger "\(^\|\s\+\)[-+]\=\d\+\ze\($\|\s\+\)" |
| 392 | |
| 393 | " Floating point number |
| 394 | " [S][ip].[fp] |
| 395 | syntax match rplFloat "\(^\|\s\+\)[-+]\=\(\d*\)\=[\.,]\(\d*\)\=\ze\($\|\s\+\)" contains=ALLBUT,rplPoint,rplSign |
| 396 | " [S]ip[.fp]E[S]exp |
| 397 | syntax match rplFloat "\(^\|\s\+\)[-+]\=\d\+\([\.,]\d*\)\=[eE]\([-+]\)\=\d\+\ze\($\|\s\+\)" contains=ALLBUT,rplPoint,rplSign |
| 398 | " [S].fpE[S]exp |
| 399 | syntax match rplFloat "\(^\|\s\+\)[-+]\=\(\d*\)\=[\.,]\d\+[eE]\([-+]\)\=\d\+\ze\($\|\s\+\)" contains=ALLBUT,rplPoint,rplSign |
| 400 | syntax match rplPoint "\<[\.,]\>" |
| 401 | syntax match rplSign "\<[+-]\>" |
| 402 | |
| 403 | " Complex number |
| 404 | " (x,y) |
| 405 | syntax match rplComplex "\(^\|\s\+\)([-+]\=\(\d*\)\=\.\=\d*\([eE][-+]\=\d\+\)\=\s*,\s*[-+]\=\(\d*\)\=\.\=\d*\([eE][-+]\=\d\+\)\=)\ze\($\|\s\+\)" |
| 406 | " (x.y) |
| 407 | syntax match rplComplex "\(^\|\s\+\)([-+]\=\(\d*\)\=,\=\d*\([eE][-+]\=\d\+\)\=\s*\.\s*[-+]\=\(\d*\)\=,\=\d*\([eE][-+]\=\d\+\)\=)\ze\($\|\s\+\)" |
| 408 | |
| 409 | " Strings |
| 410 | syntax match rplStringGuilles "\\\"" |
| 411 | syntax match rplStringAntislash "\\\\" |
| 412 | syntax region rplString start=+\(^\|\s\+\)"+ end=+"\ze\($\|\s\+\)+ contains=rplStringGuilles,rplStringAntislash |
| 413 | |
| 414 | syntax match rplTab "\t" transparent |
| 415 | |
| 416 | " Define the default highlighting. |
| 417 | " For version 5.7 and earlier: only when not done already |
| 418 | " For version 5.8 and later: only when an item doesn't have highlighting yet |
| 419 | if version >= 508 || !exists("did_rpl_syntax_inits") |
| 420 | if version < 508 |
| 421 | let did_rpl_syntax_inits = 1 |
| 422 | command -nargs=+ HiLink highlight link <args> |
| 423 | else |
| 424 | command -nargs=+ HiLink highlight default link <args> |
| 425 | endif |
| 426 | |
| 427 | " The default highlighting. |
| 428 | |
| 429 | HiLink rplControl Statement |
| 430 | HiLink rplStatement Statement |
| 431 | HiLink rplAlgConditional Conditional |
| 432 | HiLink rplConditional Repeat |
| 433 | HiLink rplConditionalError Error |
| 434 | HiLink rplRepeat Repeat |
| 435 | HiLink rplCycle Repeat |
| 436 | HiLink rplUntil Repeat |
| 437 | HiLink rplIntrinsic Special |
| 438 | HiLink rplStorage StorageClass |
| 439 | HiLink rplStorageExpr StorageClass |
| 440 | HiLink rplStorageError Error |
| 441 | HiLink rplReadWrite rplIntrinsic |
| 442 | |
| 443 | HiLink rplOperator Operator |
| 444 | |
| 445 | HiLink rplList Special |
| 446 | HiLink rplArray Special |
| 447 | HiLink rplConstant Identifier |
| 448 | HiLink rplExpr Type |
| 449 | |
| 450 | HiLink rplString String |
| 451 | HiLink rplStringGuilles String |
| 452 | HiLink rplStringAntislash String |
| 453 | |
| 454 | HiLink rplBinary Boolean |
| 455 | HiLink rplOctal Boolean |
| 456 | HiLink rplDecimal Boolean |
| 457 | HiLink rplHexadecimal Boolean |
| 458 | HiLink rplInteger Number |
| 459 | HiLink rplFloat Float |
| 460 | HiLink rplComplex Float |
| 461 | HiLink rplBoolean Identifier |
| 462 | |
| 463 | HiLink rplObsolete Todo |
| 464 | |
| 465 | HiLink rplPreCondit PreCondit |
| 466 | HiLink rplInclude Include |
| 467 | HiLink rplIncluded rplString |
| 468 | HiLink rplInclude Include |
| 469 | HiLink rplExecPath Include |
| 470 | HiLink rplPreProc PreProc |
| 471 | HiLink rplComment Comment |
| 472 | HiLink rplCommentLine Comment |
| 473 | HiLink rplCommentString Comment |
| 474 | HiLink rplSubDelimitor rplStorage |
| 475 | HiLink rplCommentError Error |
| 476 | HiLink rplParenError Error |
| 477 | HiLink rplSubError Error |
| 478 | HiLink rplArrayError Error |
| 479 | HiLink rplListError Error |
| 480 | HiLink rplTab Error |
| 481 | HiLink rplBinaryError Error |
| 482 | HiLink rplOctalError Error |
| 483 | HiLink rplDecimalError Error |
| 484 | HiLink rplHexadecimalError Error |
| 485 | |
| 486 | delcommand HiLink |
| 487 | endif |
| 488 | |
| 489 | let b:current_syntax = "rpl" |
| 490 | |
| 491 | " vim: ts=8 tw=132 |