Author: pmichaud
Date: Thu Nov  6 15:34:31 2008
New Revision: 32412

Modified:
   branches/rakon/languages/perl6/src/classes/Array.pir

Log:
[rakudo]:  circumfix:<[ ]> returns an ObjectRef


Modified: branches/rakon/languages/perl6/src/classes/Array.pir
==============================================================================
--- branches/rakon/languages/perl6/src/classes/Array.pir        (original)
+++ branches/rakon/languages/perl6/src/classes/Array.pir        Thu Nov  6 
15:34:31 2008
@@ -25,8 +25,7 @@
     $I0 = elements values
     splice $P0, values, 0, $I0
     $P0.'!flatten'()
-    $P1 = new 'Perl6Scalar'
-    assign $P1, $P0
+    $P1 = new 'ObjectRef', $P0
     .return ($P1)
 .end
 

Reply via email to