Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Add tests for RT #75674

  • Loading branch information...
commit df13d545c64ec7a18c5351e44ec65dc2ca6ed34b 1 parent c892865
@coke coke authored
Showing with 8 additions and 1 deletion.
  1. +8 −1 S03-sequence/basic.t
View
9 S03-sequence/basic.t
@@ -3,7 +3,7 @@ use Test;
# L<S03/List infix precedence/"the sequence operator">
-plan 126;
+plan 129;
# single-term sequence
@@ -254,6 +254,13 @@ is (1, 1, &[+] ... *).[^10], '1 1 2 3 5 8 13 21 34 55', 'use &[+] on infix:<...>
# previously rakudo said Not enough positional parameters passed; got 3 but expected 4
is ((1,1,2,4,8)[^4], *+*+*+* ... *)[4], 8, 'WhateverCode with arity > 3 gets enough arguments';
+#RT #75674
+{
+ is (4 ... ^5), <4 3 2 1 0 1 2 3 4>, "RT #75674";
+ is (4 ... 0,1,2,3,4), <4 3 2 1 0 1 2 3 4>, "RT #75674";
+ is (-5 ... ^5), <-5 -4 -3 -2 -1 0 1 2 3 4>, "RT #75674";
+}
+
done;
# vim: ft=perl6
Please sign in to comment.
Something went wrong with that request. Please try again.