Author: jonathan
Date: Tue Dec 9 04:14:22 2008
New Revision: 33704
Modified:
trunk/languages/perl6/src/classes/IO.pir
Log:
[rakudo] Update calls to readline for updated Parrot IO. Patch courtesy of
bacek++.
Modified: trunk/languages/perl6/src/classes/IO.pir
==============================================================================
--- trunk/languages/perl6/src/classes/IO.pir (original)
+++ trunk/languages/perl6/src/classes/IO.pir Tue Dec 9 04:14:22 2008
@@ -87,7 +87,7 @@
.sub 'readline' :method
.local pmc PIO
PIO = getattribute self, "$!PIO"
- $P0 = PIO.'readline'('')
+ $P0 = PIO.'readline'()
.return ($P0)
.end
@@ -197,7 +197,7 @@
.local pmc pio
$P0 = getattribute self, "$!IO"
pio = getattribute $P0, "$!PIO"
- $P0 = pio.'readline'("")
+ $P0 = pio.'readline'()
.return($P0)
.end
