#define M_DUP PUSH_TOS;
#define M_DROP { TOS = M_POP; }
+#define ASCII_EOT (0x04)
/***************************************************************
** Macros for Floating Point stack access.
case ID_KEY:
PUSH_TOS;
TOS = ioKey();
+ if (TOS == ASCII_EOT) {
+ M_THROW(THROW_BYE);
+ }
endcase;
#ifndef PF_NO_SHELL