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 * ------------------------------------------------------------------------
28 /**************************************************************************/
29 /* PROTOTYPES *************************************************************/
30 /**************************************************************************/
32 code(dash_trailing, "-trailing", 0)
33 code(slash_string, "/string", 0)
34 code(blank, "blank", 0)
35 code(c_move, "cmove", 0)
36 code(c_move_up, "cmove>", 0)
37 code(compare, "compare", 0)
38 code(search, "search", 0)
39 code(s_literal, "sliteral", COMP_ONLY | IMMEDIATE)