From 64bc53d1646cf17f5af50a7206bc09ec4bd5c12d Mon Sep 17 00:00:00 2001 From: Moritz Lenz Date: Wed, 5 Oct 2011 10:08:53 +0200 Subject: [PATCH] test that infix Z returns a list of parcels (RT #75818 --- S03-metaops/zip.t | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/S03-metaops/zip.t b/S03-metaops/zip.t index f19953a646..1bf94dc619 100644 --- a/S03-metaops/zip.t +++ b/S03-metaops/zip.t @@ -1,7 +1,7 @@ use v6; use Test; -plan 19; +plan 20; ok eval(' Z '), 'zip non-meta operator parses'; @@ -52,6 +52,9 @@ is (2, 10, * Z* 3, 4, 5, *).munch(5), '121,212', '[Z+] with three arrays'; } -done; +# RT #75818 +{ + isa_ok (1 Z 2)[0], Parcel, 'zip returns a list of parcels'; +} # vim: ft=perl6