RT #90158, ||= on an array

Raku · Apr 22, 2012 · 2ffae45 · 2ffae45
1 parent 07e31a8
commit 2ffae45
Showing 1 changed file with 8 additions and 3 deletions.
diff --git a/S03-operators/short-circuit.t b/S03-operators/short-circuit.t
@@ -12,9 +12,7 @@ it is closely related to || and && and //.
 
 =end description
 
-# test cases by Andrew Savige
-
-plan 79;
+plan 80;
 
 my $accum = '';
 sub f1($s)   { $accum ~= $s; 1 }
@@ -305,6 +303,13 @@ ok (0 || 0 || 1), '0 || 0 || 1 is true';
 
 }
 
+# RT #90158
+{
+    my @a = 1;
+    @a ||= ();
+    is ~@a, '1', '||= works with array on the LHS';
+}
+
 done;
 
 # vim: ft=perl6