Skip to content

Instantly share code, notes, and snippets.

@zoffixznet
Created September 13, 2018 21:56
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save zoffixznet/d1b65326fba98e2a99be6c5d4e8110e9 to your computer and use it in GitHub Desktop.
Save zoffixznet/d1b65326fba98e2a99be6c5d4e8110e9 to your computer and use it in GitHub Desktop.
2018.08.47 zoffix@VirtualBox~/R/rakudo (master)$ z t t/spec/S32-list/tail.t
t/spec/S32-list/tail.t ..
1..29
ok 1 - List.tail works
ok 2 - Array.tail works
ok 3 - Scalar.tail works
ok 4 - Range.tail works
1..3
ok 1 - code dies
ok 2 - right exception type (X::Cannot::Lazy)
ok 3 - .action matches tail
ok 5 - Range.tail on lazy list does not work
ok 6 - List.tail(5) works
ok 7 - Array.tail(5) works
ok 8 - Scalar.tail(5) works
ok 9 - Range.tail(5) works
1..3
ok 1 - code dies
ok 2 - right exception type (X::Cannot::Lazy)
ok 3 - .action matches tail
ok 10 - Range.tail(5) on lazy list does not work
ok 11 - List.tail(0) works
ok 12 - Array.tail(0) works
ok 13 - Scalar.tail(0) works
ok 14 - Range.tail(0) works
ok 15 - List.tail(-1) works
ok 16 - Array.tail(-1) works
ok 17 - Scalar.tail(-1) works
ok 18 - Range.tail(-1) works
ok 19 - List.tail works if too short
ok 20 - Array.tail works if too short
ok 21 - Range.tail works if too short
ok 22 - List.tail works if empty
ok 23 - Array.tail works if empty
ok 24 - Range.tail works if empty
1..4
ok 1 - correct tail value
ok 2 - we called .pull-one just once
ok 3 - correct tail value (when Seq got no values)
ok 4 - we did not pull (or pulled just one
ok 25 - tail makes use .count-only when it is implemented
ok 26 - can use ints over 64-bit in .tail
ok 27 - can .tail a .tail
1..4
ok 1 - List (1)
ok 2 - List (2)
ok 3 - Int (1)
ok 4 - Int (2)
ok 28 - degenerate .tail works
ok 29 - .tail(Callable) does not violate Iterator protocol
ok
All tests successful.
Files=1, Tests=29, 2 wallclock secs ( 0.03 usr 0.00 sys + 3.06 cusr 0.44 csys = 3.53 CPU)
Result: PASS
2018.08.47 zoffix@VirtualBox~/R/rakudo (master)$ ./perl6 -v
This is Rakudo version 2018.08-99-gb07874e06 built on MoarVM version 2018.08-71-gccf3dd373
implementing Perl 6.c.
2018.08.47 zoffix@VirtualBox~/R/rakudo (master)$
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment