Added tests for RT86764 Array method on parcel

Raku · Mar 22, 2011 · 3977901 · 3977901
1 parent 4806917
commit 3977901
Showing 1 changed file with 5 additions and 1 deletion.
diff --git a/S02-builtin_data_types/parcel.t b/S02-builtin_data_types/parcel.t
@@ -1,7 +1,7 @@
 use v6;
 use Test;
 
-plan 8;
+plan 11;
 
 isa_ok (5, 7, 8), Parcel, '(5, 7, 8) is Parcel';
 is +(5, 7, 8), 3, 'prefix:<+> on a Parcel';
@@ -16,5 +16,9 @@ is +<5 7 8>, 3, 'prefix:<+> on an angle bracket Parcel';
 is ~<5 7 8>, '5 7 8', 'prefix:<~> on an angle bracket Parcel';
 is <5 7 8>.Str, '5 7 8', '.Str on an angle bracket Parcel';
 
+isa_ok (5, 7, 8).Array, Array, '.Array returns an array';
+is (5, 7, 8).Array, [5,7,8], '.Array contains the right items';
+is (5, 7, 8).Array.elems, 3, '.Array contains the right number of elements';
+
 
 # vim: ft=perl6