Author: bernhard
Date: Thu Nov 10 14:28:10 2005
New Revision: 9894
Added:
trunk/examples/pasm/queens.pasm
- copied unchanged from r9893, trunk/examples/assembly/queens.pasm
Removed:
trunk/examples/assembly/queens.pasm
Modified:
trunk/MANIFEST
trunk/t/examples/pasm.t
Log:
Move the example 'queens.pasm' to examples/pasm and add a test.
Modified: trunk/MANIFEST
==============================================================================
--- trunk/MANIFEST (original)
+++ trunk/MANIFEST Thu Nov 10 14:28:10 2005
@@ -459,7 +459,6 @@ examples/assembly/nanoforth.pasm
examples/assembly/nanoforth2.pasm [main]doc
examples/assembly/ncurses_life.imc [main]doc
examples/assembly/pmcmops.pasm [main]doc
-examples/assembly/queens.pasm [main]doc
examples/assembly/queens_r.imc [main]doc
examples/assembly/thr-primes.imc [main]doc
examples/benchmarks/addit.imc [main]doc
@@ -591,6 +590,7 @@ examples/pasm/cat.pasm
examples/pasm/fact.pasm [main]doc
examples/pasm/hello.pasm [main]doc
examples/pasm/lexical.pasm [main]doc
+examples/pasm/queens.pasm [main]doc
examples/pasm/small.xml [main]doc
examples/pasm/stack.pasm [main]doc
examples/pasm/trace.pasm [main]doc
Modified: trunk/t/examples/pasm.t
==============================================================================
--- trunk/t/examples/pasm.t (original)
+++ trunk/t/examples/pasm.t Thu Nov 10 14:28:10 2005
@@ -19,6 +19,7 @@ Test the examples in F<examples/pasm>.
=head1 TODO
Check on remaining examples in 'examples/assembly'.
+Put expected output into the example files.
=head1 SEE ALSO
@@ -27,7 +28,7 @@ F<t/examples/pir.t>
=cut
use strict;
-use Parrot::Test tests => 6;
+use Parrot::Test tests => 7;
# Set up expected output for examples
my %expected
@@ -76,6 +77,29 @@ The lexical 'a' has in the current scope
The lexical 'b' has in the current scope the value 3.
END_EXPECTED
+ 'queens.pasm' => << 'END_EXPECTED',
+Making new board with 8 ranks and 8 files...
+Board length is 64.
+ +---+---+---+---+---+---+---+---+
+8 | | * | Q | * | | * | | * |
+ +---+---+---+---+---+---+---+---+
+7 | * | | * | | * | Q | * | |
+ +---+---+---+---+---+---+---+---+
+6 | | * | | Q | | * | | * |
+ +---+---+---+---+---+---+---+---+
+5 | * | Q | * | | * | | * | |
+ +---+---+---+---+---+---+---+---+
+4 | | * | | * | | * | | Q |
+ +---+---+---+---+---+---+---+---+
+3 | * | | * | | Q | | * | |
+ +---+---+---+---+---+---+---+---+
+2 | | * | | * | | * | Q | * |
+ +---+---+---+---+---+---+---+---+
+1 | Q | | * | | * | | * | |
+ +---+---+---+---+---+---+---+---+
+ A B C D E F G H
+END_EXPECTED
+
'stack.pasm' => << 'END_EXPECTED',
87654321098765432100123456789012345678998765432109876543210
END_EXPECTED