1 /* yForth? - Written by Luca Padovani (C) 1996/97
2 * ------------------------------------------------------------------------
3 * This software is FreeWare as long as it comes with this header in each
4 * source file, anyway you can use it or any part of it whatever
5 * you want. It comes without any warranty, so use it at your own risk.
6 * ------------------------------------------------------------------------
7 * Module name: toolse.h
8 * Abstract: Include file for "Programming Tools extension" word set
28 /**************************************************************************/
29 /* PROTOTYPES *************************************************************/
30 /**************************************************************************/
32 code(ahead, "ahead", COMP_ONLY | IMMEDIATE)
34 code(pick, "cs-pick", COMP_ONLY)
35 code(roll, "cs-roll", COMP_ONLY)
36 code(bracket_else, "[else]", IMMEDIATE)
37 code(bracket_if, "[if]", IMMEDIATE)
38 code(bracket_then, "[then]", IMMEDIATE)