This is a live mirror of the Perl 5 development currently hosted at
https://github.com/perl/perl5
https://perl5.git.perl.org
/
perl5.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
ee23553
)
parser.t: Move tests above ‘Add tests here’
author
Father Chrysostomos
<sprout@cpan.org>
Sun, 5 Aug 2012 19:28:51 +0000
(12:28 -0700)
committer
Father Chrysostomos
<sprout@cpan.org>
Sun, 5 Aug 2012 23:02:16 +0000
(16:02 -0700)
t/comp/parser.t
patch
|
blob
|
blame
|
history
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;