Author: masak
Date: Fri Dec 12 12:57:49 2008
New Revision: 33839
Modified:
trunk/languages/perl6/src/builtins/any-list.pir
Log:
[rakudo] made .end return highest index, not last element
Modified: trunk/languages/perl6/src/builtins/any-list.pir
==============================================================================
--- trunk/languages/perl6/src/builtins/any-list.pir (original)
+++ trunk/languages/perl6/src/builtins/any-list.pir Fri Dec 12 12:57:49 2008
@@ -53,8 +53,7 @@
list = self.'list'()
$I0 = list.'elems'()
dec $I0
- $P0 = list[$I0]
- .return ($P0)
+ .return ($I0)
.end
=item join
