/* set up TASKS list then start inner interpreter */ ' TASKS , ' DUP , /* 3 tasks for this test program */ ' ONE , ' = , /* postFORTH uses C-style '=' rather than FORTH-style '!' */ ' CELL , ' + , ' DUP , ' TWO , ' = , ' CELL , ' + , ' THREE , ' = , ' MAIN ,