From 4b05f261debf2320cd5b66df4a7becc36c4a8916 Mon Sep 17 00:00:00 2001 From: Robin Haberkorn Date: Sun, 3 Nov 2024 16:43:34 +0300 Subject: fixed assertions in ^EGq search construct for Q-Registers with uninitialized string cells Found thanks to the "infinite monkey" test. --- tests/testsuite.at | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'tests') 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) -- cgit v1.2.3