| 1 | // Generated automatically from src/vm/wren_core.wren. Do not edit. |
| 2 | static const char* coreModuleSource = |
| 3 | "class Bool {}\n" |
| 4 | "class Fiber {}\n" |
| 5 | "class Fn {}\n" |
| 6 | "class Null {}\n" |
| 7 | "class Num {}\n" |
| 8 | "\n" |
| 9 | "class Sequence {\n" |
| 10 | " all(f) {\n" |
| 11 | " var result = true\n" |
| 12 | " for (element in this) {\n" |
| 13 | " result = f.call(element)\n" |
| 14 | " if (!result) return result\n" |
| 15 | " }\n" |
| 16 | " return result\n" |
| 17 | " }\n" |
| 18 | "\n" |
| 19 | " any(f) {\n" |
| 20 | " var result = false\n" |
| 21 | " for (element in this) {\n" |
| 22 | " result = f.call(element)\n" |
| 23 | " if (result) return result\n" |
| 24 | " }\n" |
| 25 | " return result\n" |
| 26 | " }\n" |
| 27 | "\n" |
| 28 | " contains(element) {\n" |
| 29 | " for (item in this) {\n" |
| 30 | " if (element == item) return true\n" |
| 31 | " }\n" |
| 32 | " return false\n" |
| 33 | " }\n" |
| 34 | "\n" |
| 35 | " count {\n" |
| 36 | " var result = 0\n" |
| 37 | " for (element in this) {\n" |
| 38 | " result = result + 1\n" |
| 39 | " }\n" |
| 40 | " return result\n" |
| 41 | " }\n" |
| 42 | "\n" |
| 43 | " count(f) {\n" |
| 44 | " var result = 0\n" |
| 45 | " for (element in this) {\n" |
| 46 | " if (f.call(element)) result = result + 1\n" |
| 47 | " }\n" |
| 48 | " return result\n" |
| 49 | " }\n" |
| 50 | "\n" |
| 51 | " each(f) {\n" |
| 52 | " for (element in this) {\n" |
| 53 | " f.call(element)\n" |
| 54 | " }\n" |
| 55 | " }\n" |
| 56 | "\n" |
| 57 | " isEmpty { iterate(null) ? false : true }\n" |
| 58 | "\n" |
| 59 | " map(transformation) { MapSequence.new(this, transformation) }\n" |
| 60 | "\n" |
| 61 | " skip(count) {\n" |
| 62 | " if (!(count is Num) || !count.isInteger || count < 0) {\n" |
| 63 | " Fiber.abort(\"Count must be a non-negative integer.\")\n" |
| 64 | " }\n" |
| 65 | "\n" |
| 66 | " return SkipSequence.new(this, count)\n" |
| 67 | " }\n" |
| 68 | "\n" |
| 69 | " take(count) {\n" |
| 70 | " if (!(count is Num) || !count.isInteger || count < 0) {\n" |
| 71 | " Fiber.abort(\"Count must be a non-negative integer.\")\n" |
| 72 | " }\n" |
| 73 | "\n" |
| 74 | " return TakeSequence.new(this, count)\n" |
| 75 | " }\n" |
| 76 | "\n" |
| 77 | " where(predicate) { WhereSequence.new(this, predicate) }\n" |
| 78 | "\n" |
| 79 | " reduce(acc, f) {\n" |
| 80 | " for (element in this) {\n" |
| 81 | " acc = f.call(acc, element)\n" |
| 82 | " }\n" |
| 83 | " return acc\n" |
| 84 | " }\n" |
| 85 | "\n" |
| 86 | " reduce(f) {\n" |
| 87 | " var iter = iterate(null)\n" |
| 88 | " if (!iter) Fiber.abort(\"Can't reduce an empty sequence.\")\n" |
| 89 | "\n" |
| 90 | " // Seed with the first element.\n" |
| 91 | " var result = iteratorValue(iter)\n" |
| 92 | " while (iter = iterate(iter)) {\n" |
| 93 | " result = f.call(result, iteratorValue(iter))\n" |
| 94 | " }\n" |
| 95 | "\n" |
| 96 | " return result\n" |
| 97 | " }\n" |
| 98 | "\n" |
| 99 | " join() { join(\"\") }\n" |
| 100 | "\n" |
| 101 | " join(sep) {\n" |
| 102 | " var first = true\n" |
| 103 | " var result = \"\"\n" |
| 104 | "\n" |
| 105 | " for (element in this) {\n" |
| 106 | " if (!first) result = result + sep\n" |
| 107 | " first = false\n" |
| 108 | " result = result + element.toString\n" |
| 109 | " }\n" |
| 110 | "\n" |
| 111 | " return result\n" |
| 112 | " }\n" |
| 113 | "\n" |
| 114 | " toList {\n" |
| 115 | " var result = List.new()\n" |
| 116 | " for (element in this) {\n" |
| 117 | " result.add(element)\n" |
| 118 | " }\n" |
| 119 | " return result\n" |
| 120 | " }\n" |
| 121 | "}\n" |
| 122 | "\n" |
| 123 | "class MapSequence is Sequence {\n" |
| 124 | " construct new(sequence, fn) {\n" |
| 125 | " _sequence = sequence\n" |
| 126 | " _fn = fn\n" |
| 127 | " }\n" |
| 128 | "\n" |
| 129 | " iterate(iterator) { _sequence.iterate(iterator) }\n" |
| 130 | " iteratorValue(iterator) { _fn.call(_sequence.iteratorValue(iterator)) }\n" |
| 131 | "}\n" |
| 132 | "\n" |
| 133 | "class SkipSequence is Sequence {\n" |
| 134 | " construct new(sequence, count) {\n" |
| 135 | " _sequence = sequence\n" |
| 136 | " _count = count\n" |
| 137 | " }\n" |
| 138 | "\n" |
| 139 | " iterate(iterator) {\n" |
| 140 | " if (iterator) {\n" |
| 141 | " return _sequence.iterate(iterator)\n" |
| 142 | " } else {\n" |
| 143 | " iterator = _sequence.iterate(iterator)\n" |
| 144 | " var count = _count\n" |
| 145 | " while (count > 0 && iterator) {\n" |
| 146 | " iterator = _sequence.iterate(iterator)\n" |
| 147 | " count = count - 1\n" |
| 148 | " }\n" |
| 149 | " return iterator\n" |
| 150 | " }\n" |
| 151 | " }\n" |
| 152 | "\n" |
| 153 | " iteratorValue(iterator) { _sequence.iteratorValue(iterator) }\n" |
| 154 | "}\n" |
| 155 | "\n" |
| 156 | "class TakeSequence is Sequence {\n" |
| 157 | " construct new(sequence, count) {\n" |
| 158 | " _sequence = sequence\n" |
| 159 | " _count = count\n" |
| 160 | " }\n" |
| 161 | "\n" |
| 162 | " iterate(iterator) {\n" |
| 163 | " if (!iterator) _taken = 1 else _taken = _taken + 1\n" |
| 164 | " return _taken > _count ? null : _sequence.iterate(iterator)\n" |
| 165 | " }\n" |
| 166 | "\n" |
| 167 | " iteratorValue(iterator) { _sequence.iteratorValue(iterator) }\n" |
| 168 | "}\n" |
| 169 | "\n" |
| 170 | "class WhereSequence is Sequence {\n" |
| 171 | " construct new(sequence, fn) {\n" |
| 172 | " _sequence = sequence\n" |
| 173 | " _fn = fn\n" |
| 174 | " }\n" |
| 175 | "\n" |
| 176 | " iterate(iterator) {\n" |
| 177 | " while (iterator = _sequence.iterate(iterator)) {\n" |
| 178 | " if (_fn.call(_sequence.iteratorValue(iterator))) break\n" |
| 179 | " }\n" |
| 180 | " return iterator\n" |
| 181 | " }\n" |
| 182 | "\n" |
| 183 | " iteratorValue(iterator) { _sequence.iteratorValue(iterator) }\n" |
| 184 | "}\n" |
| 185 | "\n" |
| 186 | "class String is Sequence {\n" |
| 187 | " bytes { StringByteSequence.new(this) }\n" |
| 188 | " codePoints { StringCodePointSequence.new(this) }\n" |
| 189 | "\n" |
| 190 | " split(delimiter) {\n" |
| 191 | " if (!(delimiter is String) || delimiter.isEmpty) {\n" |
| 192 | " Fiber.abort(\"Delimiter must be a non-empty string.\")\n" |
| 193 | " }\n" |
| 194 | "\n" |
| 195 | " var result = []\n" |
| 196 | "\n" |
| 197 | " var last = 0\n" |
| 198 | " var index = 0\n" |
| 199 | "\n" |
| 200 | " var delimSize = delimiter.byteCount_\n" |
| 201 | " var size = byteCount_\n" |
| 202 | "\n" |
| 203 | " while (last < size && (index = indexOf(delimiter, last)) != -1) {\n" |
| 204 | " result.add(this[last...index])\n" |
| 205 | " last = index + delimSize\n" |
| 206 | " }\n" |
| 207 | "\n" |
| 208 | " if (last < size) {\n" |
| 209 | " result.add(this[last..-1])\n" |
| 210 | " } else {\n" |
| 211 | " result.add(\"\")\n" |
| 212 | " }\n" |
| 213 | " return result\n" |
| 214 | " }\n" |
| 215 | "\n" |
| 216 | " replace(from, to) {\n" |
| 217 | " if (!(from is String) || from.isEmpty) {\n" |
| 218 | " Fiber.abort(\"From must be a non-empty string.\")\n" |
| 219 | " } else if (!(to is String)) {\n" |
| 220 | " Fiber.abort(\"To must be a string.\")\n" |
| 221 | " }\n" |
| 222 | "\n" |
| 223 | " var result = \"\"\n" |
| 224 | "\n" |
| 225 | " var last = 0\n" |
| 226 | " var index = 0\n" |
| 227 | "\n" |
| 228 | " var fromSize = from.byteCount_\n" |
| 229 | " var size = byteCount_\n" |
| 230 | "\n" |
| 231 | " while (last < size && (index = indexOf(from, last)) != -1) {\n" |
| 232 | " result = result + this[last...index] + to\n" |
| 233 | " last = index + fromSize\n" |
| 234 | " }\n" |
| 235 | "\n" |
| 236 | " if (last < size) result = result + this[last..-1]\n" |
| 237 | "\n" |
| 238 | " return result\n" |
| 239 | " }\n" |
| 240 | "\n" |
| 241 | " trim() { trim_(\"\t\r\n \", true, true) }\n" |
| 242 | " trim(chars) { trim_(chars, true, true) }\n" |
| 243 | " trimEnd() { trim_(\"\t\r\n \", false, true) }\n" |
| 244 | " trimEnd(chars) { trim_(chars, false, true) }\n" |
| 245 | " trimStart() { trim_(\"\t\r\n \", true, false) }\n" |
| 246 | " trimStart(chars) { trim_(chars, true, false) }\n" |
| 247 | "\n" |
| 248 | " trim_(chars, trimStart, trimEnd) {\n" |
| 249 | " if (!(chars is String)) {\n" |
| 250 | " Fiber.abort(\"Characters must be a string.\")\n" |
| 251 | " }\n" |
| 252 | "\n" |
| 253 | " var codePoints = chars.codePoints.toList\n" |
| 254 | "\n" |
| 255 | " var start\n" |
| 256 | " if (trimStart) {\n" |
| 257 | " while (start = iterate(start)) {\n" |
| 258 | " if (!codePoints.contains(codePointAt_(start))) break\n" |
| 259 | " }\n" |
| 260 | "\n" |
| 261 | " if (start == false) return \"\"\n" |
| 262 | " } else {\n" |
| 263 | " start = 0\n" |
| 264 | " }\n" |
| 265 | "\n" |
| 266 | " var end\n" |
| 267 | " if (trimEnd) {\n" |
| 268 | " end = byteCount_ - 1\n" |
| 269 | " while (end >= start) {\n" |
| 270 | " var codePoint = codePointAt_(end)\n" |
| 271 | " if (codePoint != -1 && !codePoints.contains(codePoint)) break\n" |
| 272 | " end = end - 1\n" |
| 273 | " }\n" |
| 274 | "\n" |
| 275 | " if (end < start) return \"\"\n" |
| 276 | " } else {\n" |
| 277 | " end = -1\n" |
| 278 | " }\n" |
| 279 | "\n" |
| 280 | " return this[start..end]\n" |
| 281 | " }\n" |
| 282 | "\n" |
| 283 | " *(count) {\n" |
| 284 | " if (!(count is Num) || !count.isInteger || count < 0) {\n" |
| 285 | " Fiber.abort(\"Count must be a non-negative integer.\")\n" |
| 286 | " }\n" |
| 287 | "\n" |
| 288 | " var result = \"\"\n" |
| 289 | " for (i in 0...count) {\n" |
| 290 | " result = result + this\n" |
| 291 | " }\n" |
| 292 | " return result\n" |
| 293 | " }\n" |
| 294 | "}\n" |
| 295 | "\n" |
| 296 | "class StringByteSequence is Sequence {\n" |
| 297 | " construct new(string) {\n" |
| 298 | " _string = string\n" |
| 299 | " }\n" |
| 300 | "\n" |
| 301 | " [index] { _string.byteAt_(index) }\n" |
| 302 | " iterate(iterator) { _string.iterateByte_(iterator) }\n" |
| 303 | " iteratorValue(iterator) { _string.byteAt_(iterator) }\n" |
| 304 | "\n" |
| 305 | " count { _string.byteCount_ }\n" |
| 306 | "}\n" |
| 307 | "\n" |
| 308 | "class StringCodePointSequence is Sequence {\n" |
| 309 | " construct new(string) {\n" |
| 310 | " _string = string\n" |
| 311 | " }\n" |
| 312 | "\n" |
| 313 | " [index] { _string.codePointAt_(index) }\n" |
| 314 | " iterate(iterator) { _string.iterate(iterator) }\n" |
| 315 | " iteratorValue(iterator) { _string.codePointAt_(iterator) }\n" |
| 316 | "\n" |
| 317 | " count { _string.count }\n" |
| 318 | "}\n" |
| 319 | "\n" |
| 320 | "class List is Sequence {\n" |
| 321 | " addAll(other) {\n" |
| 322 | " for (element in other) {\n" |
| 323 | " add(element)\n" |
| 324 | " }\n" |
| 325 | " return other\n" |
| 326 | " }\n" |
| 327 | "\n" |
| 328 | " sort() { sort {|low, high| low < high } }\n" |
| 329 | "\n" |
| 330 | " sort(comparer) {\n" |
| 331 | " if (!(comparer is Fn)) {\n" |
| 332 | " Fiber.abort(\"Comparer must be a function.\")\n" |
| 333 | " }\n" |
| 334 | " quicksort_(0, count - 1, comparer)\n" |
| 335 | " return this\n" |
| 336 | " }\n" |
| 337 | "\n" |
| 338 | " quicksort_(low, high, comparer) {\n" |
| 339 | " if (low < high) {\n" |
| 340 | " var p = partition_(low, high, comparer)\n" |
| 341 | " quicksort_(low, p - 1, comparer)\n" |
| 342 | " quicksort_(p + 1, high, comparer)\n" |
| 343 | " }\n" |
| 344 | " }\n" |
| 345 | "\n" |
| 346 | " partition_(low, high, comparer) {\n" |
| 347 | " var p = this[high]\n" |
| 348 | " var i = low - 1\n" |
| 349 | " for (j in low..(high-1)) {\n" |
| 350 | " if (comparer.call(this[j], p)) { \n" |
| 351 | " i = i + 1\n" |
| 352 | " var t = this[i]\n" |
| 353 | " this[i] = this[j]\n" |
| 354 | " this[j] = t\n" |
| 355 | " }\n" |
| 356 | " }\n" |
| 357 | " var t = this[i+1]\n" |
| 358 | " this[i+1] = this[high]\n" |
| 359 | " this[high] = t\n" |
| 360 | " return i+1\n" |
| 361 | " }\n" |
| 362 | "\n" |
| 363 | " toString { \"[%(join(\", \"))]\" }\n" |
| 364 | "\n" |
| 365 | " +(other) {\n" |
| 366 | " var result = this[0..-1]\n" |
| 367 | " for (element in other) {\n" |
| 368 | " result.add(element)\n" |
| 369 | " }\n" |
| 370 | " return result\n" |
| 371 | " }\n" |
| 372 | "\n" |
| 373 | " *(count) {\n" |
| 374 | " if (!(count is Num) || !count.isInteger || count < 0) {\n" |
| 375 | " Fiber.abort(\"Count must be a non-negative integer.\")\n" |
| 376 | " }\n" |
| 377 | "\n" |
| 378 | " var result = []\n" |
| 379 | " for (i in 0...count) {\n" |
| 380 | " result.addAll(this)\n" |
| 381 | " }\n" |
| 382 | " return result\n" |
| 383 | " }\n" |
| 384 | "}\n" |
| 385 | "\n" |
| 386 | "class Map is Sequence {\n" |
| 387 | " keys { MapKeySequence.new(this) }\n" |
| 388 | " values { MapValueSequence.new(this) }\n" |
| 389 | "\n" |
| 390 | " toString {\n" |
| 391 | " var first = true\n" |
| 392 | " var result = \"{\"\n" |
| 393 | "\n" |
| 394 | " for (key in keys) {\n" |
| 395 | " if (!first) result = result + \", \"\n" |
| 396 | " first = false\n" |
| 397 | " result = result + \"%(key): %(this[key])\"\n" |
| 398 | " }\n" |
| 399 | "\n" |
| 400 | " return result + \"}\"\n" |
| 401 | " }\n" |
| 402 | "\n" |
| 403 | " iteratorValue(iterator) {\n" |
| 404 | " return MapEntry.new(\n" |
| 405 | " keyIteratorValue_(iterator),\n" |
| 406 | " valueIteratorValue_(iterator))\n" |
| 407 | " }\n" |
| 408 | "}\n" |
| 409 | "\n" |
| 410 | "class MapEntry {\n" |
| 411 | " construct new(key, value) {\n" |
| 412 | " _key = key\n" |
| 413 | " _value = value\n" |
| 414 | " }\n" |
| 415 | "\n" |
| 416 | " key { _key }\n" |
| 417 | " value { _value }\n" |
| 418 | "\n" |
| 419 | " toString { \"%(_key):%(_value)\" }\n" |
| 420 | "}\n" |
| 421 | "\n" |
| 422 | "class MapKeySequence is Sequence {\n" |
| 423 | " construct new(map) {\n" |
| 424 | " _map = map\n" |
| 425 | " }\n" |
| 426 | "\n" |
| 427 | " iterate(n) { _map.iterate(n) }\n" |
| 428 | " iteratorValue(iterator) { _map.keyIteratorValue_(iterator) }\n" |
| 429 | "}\n" |
| 430 | "\n" |
| 431 | "class MapValueSequence is Sequence {\n" |
| 432 | " construct new(map) {\n" |
| 433 | " _map = map\n" |
| 434 | " }\n" |
| 435 | "\n" |
| 436 | " iterate(n) { _map.iterate(n) }\n" |
| 437 | " iteratorValue(iterator) { _map.valueIteratorValue_(iterator) }\n" |
| 438 | "}\n" |
| 439 | "\n" |
| 440 | "class Range is Sequence {}\n" |
| 441 | "\n" |
| 442 | "class System {\n" |
| 443 | " static print() {\n" |
| 444 | " writeString_(\"\n\")\n" |
| 445 | " }\n" |
| 446 | "\n" |
| 447 | " static print(obj) {\n" |
| 448 | " writeObject_(obj)\n" |
| 449 | " writeString_(\"\n\")\n" |
| 450 | " return obj\n" |
| 451 | " }\n" |
| 452 | "\n" |
| 453 | " static printAll(sequence) {\n" |
| 454 | " for (object in sequence) writeObject_(object)\n" |
| 455 | " writeString_(\"\n\")\n" |
| 456 | " }\n" |
| 457 | "\n" |
| 458 | " static write(obj) {\n" |
| 459 | " writeObject_(obj)\n" |
| 460 | " return obj\n" |
| 461 | " }\n" |
| 462 | "\n" |
| 463 | " static writeAll(sequence) {\n" |
| 464 | " for (object in sequence) writeObject_(object)\n" |
| 465 | " }\n" |
| 466 | "\n" |
| 467 | " static writeObject_(obj) {\n" |
| 468 | " var string = obj.toString\n" |
| 469 | " if (string is String) {\n" |
| 470 | " writeString_(string)\n" |
| 471 | " } else {\n" |
| 472 | " writeString_(\"[invalid toString]\")\n" |
| 473 | " }\n" |
| 474 | " }\n" |
| 475 | "}\n" |
| 476 | "\n" |
| 477 | "class ClassAttributes {\n" |
| 478 | " self { _attributes }\n" |
| 479 | " methods { _methods }\n" |
| 480 | " construct new(attributes, methods) {\n" |
| 481 | " _attributes = attributes\n" |
| 482 | " _methods = methods\n" |
| 483 | " }\n" |
| 484 | " toString { \"attributes:%(_attributes) methods:%(_methods)\" }\n" |
| 485 | "}\n" ; |
| 486 | |
| 487 | |