Avoid warnings in pat_advanced.t in the logic for skipping a test.

Also, change the skip added in 2feceb76bc07c897 to a todo skip.

diff --git a/t/re/pat_advanced.t b/t/re/pat_advanced.t
index ad0a6c6..b102188 100644 (file)
--- a/t/re/pat_advanced.t
+++ b/t/re/pat_advanced.t
@@ -2112,9 +2112,9 @@ EOP
         ok(1, $message);  # If it didn't crash, it worked.
     }
 
-    SKIP: {   # Was looping
-        skip('Triggers thread clone SEGV. See #86550')
-         if $::running_as_thread;
+    TODO: {   # Was looping
+        todo_skip('Triggers thread clone SEGV. See #86550')
+         if $::running_as_thread && $::running_as_thread;
         watchdog(10);   # Use a bigger value for busy systems
         like("\x{00DF}", qr/[\x{1E9E}_]*/i, "\"\\x{00DF}\" =~ /[\\x{1E9E}_]*/i was looping");
     }