Map.perl preserves Map's scalar containeration

Raku · Oct 6, 2017 · 7de1138 · 7de1138
1 parent 73b1038
commit 7de1138
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/S32-hash/perl.t b/S32-hash/perl.t
@@ -5,7 +5,7 @@ use lib 't/spec/packages';
 use Test;
 use Test::Idempotence;
 
-plan 51;
+plan 52;
 
 # simple hash
 {
@@ -74,4 +74,7 @@ is-deeply (my %h{Int}).perl.EVAL.perl, '(my Any %{Int})',
     }
 }
 
+is (($ = Map.new: (:42a, :70b, :20c)).perl.EVAL,).flat.elems, 1,
+    "Map.perl preserves Map's scalar containeration";
+
 #vim: ft=perl6