// Declare some Forth functions
char forth_prolog[] = "\
\n\
: __BoolPrint__ 0= IF .\" False\" ELSE .\" True\" THEN ;\
\n\
\n\
";