I've read through the parrot design today and found it very interesting.
Here a few changes I made to get things running with todays CVS version.
greetings,
Florian La Roche
--- examples/assembly/Makefile
+++ examples/assembly/Makefile
@@ -5,6 +5,10 @@ PERL=perl # Usually overidden by main
.SUFFIXES: .pbc .pasm
+all: bsr.pbc call.pbc euclid.pbc fact.pbc io1.pbc jump.pbc life.pbc \
+ local_label.pbc mops.pbc mops_p.pbc pmcmops.pbc queens.pbc \
+ stack.pbc substr.pbc trace.pbc
+
clean:
rm -f *.pbc mops.c mops.o mops
--- examples/assembly/fact.pasm
+++ examples/assembly/fact.pasm
@@ -29,7 +29,7 @@ $done:
# I0 is the number to compute
fact:
- clonei
+ pushi
lt I0,2,$is_one
set I1,I0
dec I0,1
--- examples/assembly/mops_p.pasm
+++ examples/assembly/mops_p.pasm
@@ -32,7 +32,7 @@
time N1
-REDO: sub P4, P4, 1
+REDO: sub P4, P4, P3
if P4, REDO
print "done\n"
--- languages/jako/Makefile.in
+++ languages/jako/Makefile.in
@@ -6,7 +6,7 @@
DIR=languages/jako
TOOL_DIR=../..
-ASM=perl -I ../../ ../../assemble.pl
+ASM=perl -I ../../lib ../../assemble.pl
JAKOC=./jakoc
INTERP=../../${test_prog}
