diff options
Diffstat (limited to 'tests/custom')
| -rw-r--r-- | tests/custom/00_syntax/21_regex_literals | 26 | ||||
| -rw-r--r-- | tests/custom/99_bugs/41_compiler_invalid_return_opcode | 20 |
2 files changed, 45 insertions, 1 deletions
diff --git a/tests/custom/00_syntax/21_regex_literals b/tests/custom/00_syntax/21_regex_literals index d7ba7c4..7466a2e 100644 --- a/tests/custom/00_syntax/21_regex_literals +++ b/tests/custom/00_syntax/21_regex_literals @@ -4,7 +4,7 @@ within regular expression literals is subject of the underlying regular expression engine. -- Expect stdout -- -[ "/Hello world/", "/test/gis", "/test/g", "/test1 \\\/ test2/", "/\\x31\n\\.\u0007\b\\c\\u2600\\\\/" ] +[ "/Hello world/", "/test/gis", "/test/g", "/test1 / test2/", "/1\n\\.\u0007\bc☀\\\\/" ] -- End -- -- Testcase -- @@ -93,3 +93,27 @@ In line 7, byte 30: } %} -- End -- + + +Testing that slashes within character classes are not treated as regex +literal delimitters. + +-- Expect stdout -- +[ + "/[/]/", + "/[[./.]/]/", + "/[[:alpha:]/]/", + "/[[=/=]/]/" +] +-- End -- + +-- Testcase -- +{% + printf("%.J\n", [ + /[/]/, + /[[./.]/]/, + /[[:alpha:]/]/, + /[[=/=]/]/ + ]); +%} +-- End -- diff --git a/tests/custom/99_bugs/41_compiler_invalid_return_opcode b/tests/custom/99_bugs/41_compiler_invalid_return_opcode new file mode 100644 index 0000000..a97dae9 --- /dev/null +++ b/tests/custom/99_bugs/41_compiler_invalid_return_opcode @@ -0,0 +1,20 @@ +When compiling an arrow function body with a trailing loop or conditional +statement having an empty body, the emitted return code incorrectly +overwrote the target address of the jump instruction. + +-- Testcase -- +(() => { + if(0) + ; +})(); + +print("OK\n"); +-- End -- + +-- Args -- +-R +-- End -- + +-- Expect stdout -- +OK +-- End -- |