disable some shallow-recurse rpeep tests

The long chain of ?: was always intended to fail, and shouldn't have
made it into the original commit. The while(1){..} used to work, but
started failing once the tail-recursion optimisation was removed.
These tests only failed on some platforms - presumably those with a small
per-thread stack size.

1 files changed, 5 insertions, 3 deletions

diff --git a/t/op/threads.t b/t/op/threads.t
index b159823c15..2991f5ed41 100644
--- a/t/op/threads.t
+++ b/t/op/threads.t
@@ -355,12 +355,14 @@ EOI
 	$r = $x && $y;
 	$x &&= $y;
 	$r = $x ? $y : $z;
-	$r = $x ? "x" : $x ? "x" : $x ? "x" : $x ? "x" : $x ? "x" : $x ? "x"
-	   : $x ? "x" : $x ? "x" : $x ? "x" : $x ? "x" : $x ? "x" : "y";
 	@a = map $x+1, @a;
 	@a = grep $x+1, @a;
 	$r = /$x/../$y/;
-	while (1) { $x = 0 };
+
+	# this one will fail since we removed tail recursion optimisation
+	# with f11ca51e41e8
+	#while (1) { $x = 0 };
+
 	while (0) { $x = 0 };
 	for ($x=0; $y; $z=0) { $r = 0 };
 	for (1) { $x = 0 };