// Declare some Forth functions
char forth_prolog[] = "\
\n\
VARIABLE __Local_Vars__ 1000 CELLS ALLOT\
\n\
\n\
";