[svn:parrot] r39612 - trunk/docs/book/pir

[allison at svn.parrot.org]

Author: allison
Date: Wed Jun 17 05:19:49 2009
New Revision: 39612
URL: https://trac.parrot.org/parrot/changeset/39612

Log:
[book] Fixing example test failures in chapter 8.

Modified:
   trunk/docs/book/pir/ch08_io.pod

Modified: trunk/docs/book/pir/ch08_io.pod
==============================================================================
--- trunk/docs/book/pir/ch08_io.pod	Wed Jun 17 05:18:25 2009	(r39611)
+++ trunk/docs/book/pir/ch08_io.pod	Wed Jun 17 05:19:49 2009	(r39612)
@@ -120,7 +120,7 @@
 =begin PIR_FRAGMENT
 
   $P0 = getstdout
-  say $P0, 'hello'
+  print $P0, 'hello'
 
 =end PIR_FRAGMENT
 
@@ -136,7 +136,7 @@
     $P1 = open 'myfile.txt', 'r'
     loop_top:
       $S0 = readline $P1
-      say $P0, $S0
+      print $P0, $S0
       if $P1 goto loop_top
     close $P1
   .end
@@ -224,11 +224,11 @@
 
   $S0 = $P0.'read'(10)
 
+=end PIR_FRAGMENT
+
 If the remaining bytes in the filehandle are fewer than the requested
 number of bytes, returns a string containing the remaining bytes.
 
-=end PIR_FRAGMENT
-
 =head3 readline
 
 The C<readline> method reads an entire line up to a newline character or