diff options
| author | Robin Haberkorn <robin.haberkorn@googlemail.com> | 2024-11-03 16:43:34 +0300 |
|---|---|---|
| committer | Robin Haberkorn <robin.haberkorn@googlemail.com> | 2024-11-03 22:36:36 +0300 |
| commit | 4b05f261debf2320cd5b66df4a7becc36c4a8916 (patch) | |
| tree | a80af49b9cd8c5036ea8316dc93204d0e00778de /tests | |
| parent | 18bb9c0cd8e8b8f74347eef1a5afabe6233159d7 (diff) | |
| download | sciteco-4b05f261debf2320cd5b66df4a7becc36c4a8916.tar.gz | |
fixed assertions in ^EGq search construct for Q-Registers with uninitialized string cells
Found thanks to the "infinite monkey" test.
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/testsuite.at | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/tests/testsuite.at b/tests/testsuite.at index edf2d3f..3ed4df8 100644 --- a/tests/testsuite.at +++ b/tests/testsuite.at @@ -177,6 +177,11 @@ AT_CHECK([$SCITECO -e ":@S/foo/\"S(0/0)'"], 0, ignore, ignore) AT_CHECK([$SCITECO -e ":@N/foo/\"S(0/0)'"], 0, ignore, ignore) AT_CLEANUP +AT_SETUP([Search for one of characters in uninitialized Q-Register]) +# Register "a" exists, but it's string part is yet uninitialized. +AT_CHECK([$SCITECO -e ":@S/^EGa/\"S(0/0)'"], 0, ignore, ignore) +AT_CLEANUP + AT_SETUP([Memory limiting during spawning]) # This might result in an OOM if memory limiting is not working AT_CHECK([$SCITECO -e "50*1000*1000,2EJ 0,128ED @EC'dd if=/dev/zero'"], 1, ignore, ignore) |