Author: particle
Date: Mon Dec 8 23:28:28 2008
New Revision: 33700
Modified:
trunk/languages/perl6/src/classes/IO.pir
Log:
[rakudo] slurp('') becomes readall(); bacek++
Modified: trunk/languages/perl6/src/classes/IO.pir
==============================================================================
--- trunk/languages/perl6/src/classes/IO.pir (original)
+++ trunk/languages/perl6/src/classes/IO.pir Mon Dec 8 23:28:28 2008
@@ -101,7 +101,7 @@
.sub 'slurp' :method
.local pmc PIO
PIO = getattribute self, "$!PIO"
- $S0 = PIO.'slurp'('')
+ $S0 = PIO.'readall'()
.return($S0)
.end
