parser.t: Move tests above ‘Add tests here’

[perl5.git] / t / comp / parser.t

diff --git a/t/comp/parser.t b/t/comp/parser.t
index 9ae7b75..ac6742e 100644 (file)
--- a/t/comp/parser.t
+++ b/t/comp/parser.t
@@ -366,8 +366,6 @@ eval q{
 };
 is($@, "", "multiline whitespace inside substitute expression");
 
-# Add new tests HERE:
-
 eval '@A =~ s/a/b/; # compilation error
       sub tahi {}
       sub rua;
@@ -390,6 +388,8 @@ is $::{waru}, undef, 'sub w attr+proto ignored after compilation error';
 is $::{iwa}, undef, 'non-empty sub decl ignored after compilation error';
 is *BEGIN{CODE}, undef, 'BEGIN leaves no stub after compilation error';
 
+# Add new tests HERE (above this line)
+
 # bug #74022: Loop on characters in \p{OtherIDContinue}
 # This test hangs if it fails.
 eval chr 0x387;