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:
d206794
)
Add test for [perl #129036]
author
Karl Williamson
<khw@cpan.org>
Mon, 30 Jan 2017 03:59:44 +0000
(20:59 -0700)
committer
Karl Williamson
<khw@cpan.org>
Mon, 30 Jan 2017 04:05:54 +0000
(21:05 -0700)
This was fixed by
6cdc5cd8f36f88172b0fcefdcadec75f5b6600b2
(but I didn't check that this was the actual commit).
t/lib/warnings/toke
patch
|
blob
|
blame
|
history
diff --git
a/t/lib/warnings/toke
b/t/lib/warnings/toke
index
1d95643
..
2774f08
100644
(file)
--- a/
t/lib/warnings/toke
+++ b/
t/lib/warnings/toke
@@
-1642,3
+1642,10
@@
Malformed UTF-8 character (fatal) at - line 11.
no warnings "uninitialized";
BEGIN{$^H=-1};my $l; s
\0
$0[$l]
\0
\0
EXPECT
+########
+# NAME [perl $129036] Assertion failure
+BEGIN{$0="";$^H=hex join""=>A00000}p?
+EXPECT
+OPTION fatal
+syntax error at - line 1, at EOF
+Execution of - aborted due to compilation errors.