diff options
| author | Tony Cook <tony@develop-help.com> | 2015-08-24 11:46:35 +1000 |
|---|---|---|
| committer | Tony Cook <tony@develop-help.com> | 2015-08-27 14:00:05 +1000 |
| commit | e6b2cf838e87ec34b3a2043c947b4f723d6efcca (patch) | |
| tree | 72bbf1f7460d40c7d2a4d39543e646e0e146c7fe /t | |
| parent | a9b708ba5552bfe8ce5d5a0291df60aca3b2e883 (diff) | |
| download | perl-e6b2cf838e87ec34b3a2043c947b4f723d6efcca.tar.gz | |
[perl #125341] check for unexpected trash after any sub start
Diffstat (limited to 't')
| -rw-r--r-- | t/lib/croak/toke | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/t/lib/croak/toke b/t/lib/croak/toke index 78ff6cd855..64012fb78c 100644 --- a/t/lib/croak/toke +++ b/t/lib/croak/toke @@ -279,3 +279,8 @@ state ($x, $y, state $z); EXPECT Can't redeclare "state" in "state" at - line 2, near ", " Execution of - aborted due to compilation errors. +######## +# NAME BEGIN <> [perl #125341] +BEGIN <> +EXPECT +Illegal declaration of subroutine BEGIN at - line 1. |