[gforth] / gforth / Attic / io.h  

gforth: gforth/Attic/io.h


1 : anton 1.1 /* Input driver header */
2 :    
3 : anton 1.3 #include <setjmp.h>
4 :    
5 : anton 1.1 unsigned char getkey(FILE *);
6 : anton 1.3 long key_avail(FILE *);
7 : anton 1.1 void prep_terminal();
8 :     void deprep_terminal();
9 :     void install_signal_handlers(void);
10 : anton 1.3
11 :     extern jmp_buf throw_jmp_buf;
12 : anton 1.1
13 :     #define key() getkey(stdin)
14 : benschop 1.2 #define key_query -(!!key_avail(stdin)) /* !! FLAG(...)? - anton */
15 :     /* flag was originally wrong -- lennart */
16 :    

CVS Admin

Powered by ViewCVS 1.0-dev
(Powered by ViewCVS)

ViewCVS and CVS Help