X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=t%2F50-unwind-target.t;h=9ef70ecf7a213fc80c99621d455b7389c6f7d452;hb=00eb4513e6dc65546222404eaa0e1c4910587c70;hp=3c7a21d278b6bdd9b0c969c6a9051dbc3e56c11f;hpb=463fb6b2306558e10e95198da1d0bbf0b5256e61;p=perl%2Fmodules%2FScope-Upper.git diff --git a/t/50-unwind-target.t b/t/50-unwind-target.t index 3c7a21d..9ef70ec 100644 --- a/t/50-unwind-target.t +++ b/t/50-unwind-target.t @@ -25,5 +25,5 @@ is_deeply \@res, [ 7 ], 'unwind(-1)'; unwind 0; 8; }); -like $@, qr/^Can't\s+return\s+outside\s+a\s+subroutine/, 'unwind(100) croaks'; -is_deeply \@res, [ 7 ], 'unwind(100)'; +like $@, qr/^Can't\s+return\s+outside\s+a\s+subroutine/, 'unwind(0) croaks'; +is_deeply \@res, [ 7 ], 'unwind(0)';