Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

[t/spec] test for RT #75266, indexing array attributes with non-Ints

git-svn-id: http://svn.pugscode.org/pugs@31413 c213334d-75ef-0310-aa23-eaa082d1ae64
  • Loading branch information...
commit f1fac49fcdfab1ca9e665462a3220da9fc6e8854 1 parent d92bacd
moritz authored
Showing with 6 additions and 1 deletion.
  1. +6 −1 S12-attributes/instance.t
View
7 S12-attributes/instance.t
@@ -2,7 +2,7 @@ use v6;
use Test;
-plan 128;
+plan 129;
=begin pod
@@ -337,6 +337,10 @@ is Foo7e.new.attr, 42, "default attribute value (1)";
is $o.m0, 'a', '@.a[0] works';
is $o.m1, 'b', '@.a[*-2] works';
is $o.m2, 'c', '@.a[*-1] works';
+
+ # RT #75266
+ is ArrayAttribTest.new(a => <x y z>).a[2.0], 'z',
+ 'Can index array attributes with non-integers';
}
{
@@ -573,4 +577,5 @@ is Foo7e.new.attr, 42, "default attribute value (1)";
is TestMethodAll.new(a => 5).all, 5, 'Can call a method all()';
}
+
# vim: ft=perl6
Please sign in to comment.
Something went wrong with that request. Please try again.