commit 49d24a4d7994458b9efb3a234acad59c937298ed
Author: Vasily Chekalkin <bacek@bacek.com>
Date:   Tue Dec 9 21:54:47 2008 +1100

    Fix io.readline calls

diff --git a/languages/perl6/src/classes/IO.pir b/languages/perl6/src/classes/IO.pir
index 6dd5f28..be67b70 100644
--- a/languages/perl6/src/classes/IO.pir
+++ b/languages/perl6/src/classes/IO.pir
@@ -90,7 +90,7 @@ Reads a line from the file handle.
 .sub 'readline' :method
     .local pmc PIO
     PIO = getattribute self, "$!PIO"
-    $P0 = PIO.'readline'('')
+    $P0 = PIO.'readline'()
     .return ($P0)
 .end
 
@@ -223,7 +223,7 @@ Return the value inside this container in item context.
     .local pmc pio
     $P0 = getattribute self, "$!IO"
     pio = getattribute $P0, "$!PIO"
-    $P0 = pio.'readline'("")
+    $P0 = pio.'readline'()
     .return($P0)
 .end