diff options
Diffstat (limited to 't/base/lex.t')
| -rw-r--r-- | t/base/lex.t | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/t/base/lex.t b/t/base/lex.t index f93816855c..66db28b0ae 100644 --- a/t/base/lex.t +++ b/t/base/lex.t @@ -485,3 +485,6 @@ print "ok $test - map{sub :lvalue...}\n"; $test++; # Used to crash [perl #123711] 0-5x-l{0}; + +# Used to fail an assertion [perl #123617] +eval '"$a{ 1 m// }"; //'; |