Author: bernhard
Date: Fri Nov 4 09:52:59 2005
New Revision: 9780
Added:
trunk/examples/pasm/trace.pasm
- copied unchanged from r9778, trunk/examples/assembly/trace.pasm
Removed:
trunk/examples/assembly/trace.pasm
Modified:
trunk/MANIFEST
trunk/t/examples/pasm.t
Log:
Move the example 'trace.pasm' to 'examples/pasm' and add a test.
Modified: trunk/MANIFEST
==============================================================================
--- trunk/MANIFEST (original)
+++ trunk/MANIFEST Fri Nov 4 09:52:59 2005
@@ -457,7 +457,6 @@ examples/assembly/pmcmops.pasm
examples/assembly/queens.pasm [main]doc
examples/assembly/queens_r.imc [main]doc
examples/assembly/thr-primes.imc [main]doc
-examples/assembly/trace.pasm [main]doc
examples/assembly/uniq.pasm [main]doc
examples/benchmarks/addit.imc [main]doc
examples/benchmarks/addit.pasm [main]doc
@@ -590,6 +589,7 @@ examples/pasm/hello.pasm
examples/pasm/lexical.pasm [main]doc
examples/pasm/small.xml [main]doc
examples/pasm/stack.pasm [main]doc
+examples/pasm/trace.pasm [main]doc
examples/pasm/xml_parser.pasm [main]doc
examples/pge/README [main]doc
examples/pge/all.pir [main]doc
Modified: trunk/t/examples/pasm.t
==============================================================================
--- trunk/t/examples/pasm.t (original)
+++ trunk/t/examples/pasm.t Fri Nov 4 09:52:59 2005
@@ -22,12 +22,12 @@ Check on remaining examples in 'examples
=head1 SEE ALSO
-F<t/examples/japh.t>
+F<t/examples/pir.t>
=cut
use strict;
-use Parrot::Test tests => 5;
+use Parrot::Test tests => 6;
use Test::More;
# Set up expected output for examples
@@ -80,6 +80,14 @@ END_EXPECTED
87654321098765432100123456789012345678998765432109876543210
END_EXPECTED
+ 'trace.pasm' => << 'END_EXPECTED',
+Howdy!
+ 4 print "There!\n"
+There!
+ 6 trace 0
+Partner!
+END_EXPECTED
+
'xml_parser.pasm' => << 'END_EXPECTED',
Start xml version=1.0
Start top
