X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=t%2F50-unwind-target.t;h=9ef70ecf7a213fc80c99621d455b7389c6f7d452;hb=2236279ceecd37fc3e752bdf1142808a0f671d6e;hp=3c7a21d278b6bdd9b0c969c6a9051dbc3e56c11f;hpb=daa5478303f254eff6015045396920baafee0688;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)';