Update 40_file_ops.pir

[whiteknight]

This file, from examples/tutorial/, needs to be reviewed and possibly updated after all the IO changes recently. If the file is still accurate, some description needs to be added. Otherwise, the file needs to be redone completely (and make sure to update any changes in the t/examples/tutorial.t test file as well).

[jkeenan]

Here's the file's code in its entirety:

.sub main :main
    .local pmc fileout, filein

    fileout = open '40_file_ops_data.txt', 'w'
    print fileout, "The quick brown fox jumps over the lazy dog.\n"
    close fileout

    filein = open '40_file_ops_data.txt', 'r'
    $S0 = readline filein
    say $S0
    close filein

    # Be nice and remove the temporary file we created.
    $P1 = new 'OS'
    $P1.'rm'('40_file_ops_data.txt')
.end

Where in the source code would we find the current IO functionality that would govern this example?

Thank you very much.
kid51

[allison]

File reviewed, all is accurate and up-to-date with current I/O functionality. The I/O refactor didn't really change the PIR interface aside from read modes, which have been updated in the example file.