Move formerly TODO test, now PASSing

... to more permanent location
Perl · Dec 15, 2024 · 68c51a5 · 68c51a5
1 parent 6518f61
commit 68c51a5
Show file tree

Hide file tree

Showing 2 changed files with 7 additions and 8 deletions.
diff --git a/t/re/pat.t b/t/re/pat.t
@@ -28,7 +28,7 @@ skip_all_without_unicode_tables();
 my $has_locales = locales_enabled('LC_CTYPE');
 my $utf8_locale = find_utf8_ctype_locale();
 
-plan tests => 1297;  # Update this when adding/deleting tests.
+plan tests => 1298;  # Update this when adding/deleting tests.
 
 run_tests() unless caller;
 
@@ -2655,6 +2655,12 @@ PROG
         is($?, 0, "No assertion failure (GH 16952)");
     }
 
+    {
+        fresh_perl('$_ = "a"; s{ x | (?{ s{}{x} }) }{}gx;',
+                   { stderr => 'devnull' });
+        is($?, 0, "No assertion failure (GH 16876)");
+    }
+
 } # End of sub run_tests
 
 1;

diff --git a/t/run/todo.t b/t/run/todo.t
@@ -39,13 +39,6 @@ TODO: {
     "undef:de567\nundef:de567", { eval $switches }, "");
 }
 
-TODO: {
-    local $::TODO = 'GH 16876';
-    fresh_perl('$_ = "a"; s{ x | (?{ s{}{x} }) }{}gx;',
-               { stderr => 'devnull' });
-    is($?, 0, "No assertion failure");
-}
-
 TODO: {
     local $::TODO = 'GH 16971';
     fresh_perl('split(/00|0\G/, "000")',