diff options
Diffstat (limited to 'ext/arybase/t/lslice.t')
| -rw-r--r-- | ext/arybase/t/lslice.t | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/ext/arybase/t/lslice.t b/ext/arybase/t/lslice.t index c012b84f5e..0db7a078f2 100644 --- a/ext/arybase/t/lslice.t +++ b/ext/arybase/t/lslice.t @@ -1,7 +1,7 @@ use warnings; no warnings 'deprecated'; use strict; -use Test::More tests => 11; +use Test::More tests => 12; our @i4 = (3, 5, 3, 5); @@ -11,6 +11,7 @@ is_deeply [ scalar qw(a b c d e f)[3,4] ], [ qw(b) ]; is_deeply [ qw(a b c d e f)[3,4,8,9] ], [ qw(a b f), undef ]; is_deeply [ scalar qw(a b c d e f)[@i4] ], [ qw(c) ]; is_deeply [ qw(a b c d e f)[@i4] ], [ qw(a c a c) ]; +is_deeply [ 3, 4, qw(a b c d e f)[@i4] ], [ 3, 4, qw(a c a c) ]; is_deeply [ qw(a b c d e f)[-1,-2] ], [ qw(f e) ]; is_deeply [ qw(a b c d e f)[2,1] ], [ qw(f e) ]; |