make TODO output TAP-compliant in regexp.t

p4raw-id: //depot/perl@33919

diff --git a/t/op/regexp.t b/t/op/regexp.t
index 793a474..147e4cc 100755 (executable)
--- a/t/op/regexp.t
+++ b/t/op/regexp.t
@@ -173,7 +173,7 @@ EOFCODE
            next TEST;
        }
        elsif ( $todo ) {
-           print "not ok $test # todo", length($reason) ? " - $reason" : '', "\n";
+           print "not ok $test # TODO", length($reason) ? " - $reason" : '', "\n";
            next TEST;
        }
        elsif ($@) {