cvsuser 03/01/17 07:11:17
Modified: languages/ook ook.pasm
Log:
use eval
Revision Changes Path
1.2 +9 -4 parrot/languages/ook/ook.pasm
Index: ook.pasm
===================================================================
RCS file: /cvs/public/parrot/languages/ook/ook.pasm,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -w -r1.1 -r1.2
--- ook.pasm 1 Jan 2003 00:34:16 -0000 1.1
+++ ook.pasm 17 Jan 2003 15:11:17 -0000 1.2
@@ -101,7 +101,12 @@
LOOP_END:
le I1, I0, LOOP
concat S4, "\tend\n"
- print S4
+ #print S4
+ # needs imcc:
+ # ../imcc/imcc -r ook.pasm hello.ook
+ compreg P1, "PASM"
+ compile P0, P1, S4
+ invoke
end
# Given the content of P1, create a label of integers concateneted in S6.
