--- gforth/arch/generic/machine.h	2007/03/25 21:30:59	1.25
+++ gforth/arch/generic/machine.h	2007/04/09 22:36:01	1.27
@@ -99,11 +99,12 @@ typedef void *Label;
 #undef HAS_DEBUG
 #undef HAS_GLOCALS
 #undef HAS_HASH
+#define HAS_F83HEADERSTRING
 #ifndef PUTC
-# define PUTC(x) putc(x, stdout)
+# define PUTC(x) emit_char(x)
 #endif
 #ifndef TYPE
-# define TYPE(x, l) fwrite(x, l, 1, stdout)
+# define TYPE(x, l) type_chars(x, l)
 #endif
 #endif
 #define HAS_DCOMPS