[svn:parrot] r38885 - trunk/t/examples

[coke at svn.parrot.org]

Author: coke
Date: Mon May 18 02:16:09 2009
New Revision: 38885
URL: https://trac.parrot.org/parrot/changeset/38885

Log:
[t] Pass the streams test again;

Recent updates had broken it (TT#668)

Modified:
   trunk/t/examples/streams.t

Modified: trunk/t/examples/streams.t
==============================================================================
--- trunk/t/examples/streams.t	Mon May 18 01:10:32 2009	(r38884)
+++ trunk/t/examples/streams.t	Mon May 18 02:16:09 2009	(r38885)
@@ -160,26 +160,26 @@
 read:[   38     name = argv[1]]
 read:[   39 NO_NAME:]
 read:[   40 ]
-read:[   41     load_bytecode \"library/Stream/ParrotIO.pir\"]
-read:[   42     load_bytecode \"library/Stream/Lines.pir\"]
-read:[   43     load_bytecode \"library/Stream/Sub.pir\"]
-read:[   44     load_bytecode \"library/Stream/Combiner.pir\"]
+read:[   41     load_bytecode 'Stream/ParrotIO.pbc']
+read:[   42     load_bytecode 'Stream/Lines.pbc']
+read:[   43     load_bytecode 'Stream/Sub.pbc']
+read:[   44     load_bytecode 'Stream/Combiner.pbc']
 read:[   45 ]
 read:[   46     # create a file stream]
-read:[   47     file = new \"Stream::ParrotIO\"]
+read:[   47     file = new ['Stream'; 'ParrotIO']]
 read:[   48     file.\"open\"( name, 'r' )]
 read:[   49 ]
 read:[   50     # process it one line per read]
-read:[   51     lines = new \"Stream::Lines\"]
+read:[   51     lines = new ['Stream'; 'Lines']]
 read:[   52     assign lines, file]
 read:[   53 ]
 read:[   54     # endless counter]
-read:[   55     counter = new \"Stream::Sub\"]
+read:[   55     counter = new ['Stream'; 'Sub']]
 read:[   56     .const 'Sub' temp = \"_counter\"]
 read:[   57     assign counter, temp]
 read:[   58 ]
 read:[   59     # combine the counter and the file's lines]
-read:[   60     combiner = new \"Stream::Combiner\"]
+read:[   60     combiner = new ['Stream'; 'Combiner']]
 read:[   61     assign combiner, counter]
 read:[   62     assign combiner, lines]
 read:[   63 ]
@@ -223,7 +223,7 @@
 read:[  101 ]
 read:[  102 =head1 COPYRIGHT]
 read:[  103 ]
-read:[  104 Copyright (C) 2004-2008, Parrot Foundation.]
+read:[  104 Copyright (C) 2004-2009, Parrot Foundation.]
 read:[  105 ]
 read:[  106 =cut]
 read:[  107 ]
@@ -247,20 +247,20 @@
 read:[ng the C<open> method, you can also assign your ow]
 read:[n ParrotIO\nPMC to the stream with the C<assign> op]
 read:[.\n\n=cut\n\n.sub _main :main\n    .local pmc stream\n\n ]
-read:[   load_bytecode \"library/Stream/ParrotIO.pir\"\n\n  ]
-read:[  # create the ParrotIO stream\n    stream = new \"S]
-read:[tream::ParrotIO\"\n\n    # open this file\n    stream.]
-read:[\"open\"( \"examples/streams/ParrotIO.pir\", 'r' )\n\n  ]
-read:[  # you can specify a custom block size with\n    #]
-read:[ stream.\"blockSize\"( 10 )\n\n    # dump the stream\n ]
-read:[   stream.\"dump\"()\n\n    end\n.end\n\n=head1 AUTHOR\n\nJ]
-read:[ens Rieks E<lt>parrot at jensbeimsurfen dot deE<gt]
-read:[> is the author\nand maintainer.\nPlease send patche]
-read:[s and suggestions to the Perl 6 Internals mailing ]
-read:[list.\n\n=head1 COPYRIGHT\n\nCopyright (C) 2004-2008, ]
-read:[Parrot Foundation.\n\n=cut\n\n# Local Variables:\n#   m]
-read:[ode: pir\n#   fill-column: 100\n# End:\n# vim: expand]
-read:[tab shiftwidth=4 ft=pir:\n]
+read:[   load_bytecode 'Stream/ParrotIO.pbc'\n\n    # crea]
+read:[te the ParrotIO stream\n    stream = new ['Stream';]
+read:[ 'ParrotIO']\n\n    # open this file\n    stream.\"ope]
+read:[n\"( \"examples/streams/ParrotIO.pir\", 'r' )\n\n    # ]
+read:[you can specify a custom block size with\n    # str]
+read:[eam.\"blockSize\"( 10 )\n\n    # dump the stream\n    s]
+read:[tream.\"dump\"()\n\n    end\n.end\n\n=head1 AUTHOR\n\nJens ]
+read:[Rieks E<lt>parrot at jensbeimsurfen dot deE<gt> is]
+read:[ the author\nand maintainer.\nPlease send patches an]
+read:[d suggestions to the Perl 6 Internals mailing list]
+read:[.\n\n=head1 COPYRIGHT\n\nCopyright (C) 2004-2009, Parr]
+read:[ot Foundation.\n\n=cut\n\n# Local Variables:\n#   mode:]
+read:[ pir\n#   fill-column: 100\n# End:\n# vim: expandtab ]
+read:[shiftwidth=4 ft=pir:\n]
 EXP_PARROTIO
     },
 );