X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/12d3c230bf3c96adcc0fd2c8d49888f2719d6781..9ffcdca1f50:/t/op/svleak.t

diff --git a/t/op/svleak.t b/t/op/svleak.t
index 8134b56..8416656 100644
--- a/t/op/svleak.t
+++ b/t/op/svleak.t
@@ -15,7 +15,7 @@ BEGIN {
 
 use Config;
 
-plan tests => 64;
+plan tests => 65;
 
 # run some code N times. If the number of SVs at the end of loop N is
 # greater than (N-1)*delta at the end of loop 1, we've got a leak
@@ -195,6 +195,7 @@ SKIP: {
 }
 
 eleak(2, 0, '+sub:a{}', 'anon subs with invalid attributes');
+eleak(2, 0, 'no warnings; sub a{1 1}', 'sub with syntax error');
 
 # Syntax errors
 eleak(2, 0, '"${<<END}"