Jerome Quelin (via RT) wrote:

- currently I'm just printing on stdout the resulting parrot code, I lack an eval instruction in Parrot. Dan, Leo? :-)
$ diff -ub  ~/src/parrot/languages/ook/ook.pasm ook.pasm
--- /home/lt/src/parrot/languages/ook/ook.pasm  Wed Jan  1 01:34:16 2003
+++ ook.pasm    Wed Jan 15 16:41:00 2003
@@ -101,7 +101,8 @@
 LOOP_END:
         le I1, I0, LOOP
         concat S4, "\tend\n"
-        print S4
+        #print S4
+       compile P1, S4, "PASM"
         end

$ ../imcc/imcc -r ook.pasm hello.ook
Hello World!

$ ../imcc/imcc -r ook.pasm test.ook
1..1
ok 1

(compile does eval here for test purposes)

Have fun!
leo

Reply via email to