Skip to content


Subversion checkout URL

You can clone with
Download ZIP
Browse files

[t/04-output.t] worked around a rakudobug

Apparently, doing .[1..*] on an Array makes Rakudo segfault at the moment.
[perl #77078]
  • Loading branch information...
commit 25227176c9f9a7d1a828e02cc748a26ec8f71e88 1 parent 4e33e50
@masak authored
Showing with 6 additions and 1 deletion.
  1. +6 −1 t/04-output.t
7 t/04-output.t
@@ -21,8 +21,13 @@ is_deeply Text::CSV.parse($input, :output<arrays>),
'with :output<arrays>, an AoA is returned, header included';
+# RAKUDO: We'd like to just be able to say @AoA[1..*], but that doesn't work
+# right now. [perl #77078]
+my @last-of-AoA = @AoA;
+shift @last-of-AoA;
is_deeply Text::CSV.parse($input, :skip-header),
- @AoA[1..^*],
+ @last-of-AoA,
'with :skip-header, the first line is left out';
my @AoH = { :subject<dog>, :predicate<bites>, :object<man> },

0 comments on commit 2522717

Please sign in to comment.
Something went wrong with that request. Please try again.