File:  [gforth] / gforth / Attic / io.h
Revision 1.3: download - view: text, annotated - select for diffs
Fri Jul 8 15:00:48 1994 UTC (28 years, 1 month ago) by anton
Branches: MAIN
CVS tags: HEAD
signals are now translated into THROWs
A number of bug fixes (make a diff of BUGS for details)
added assert.fs and debugging.fs
made .s nicer
keep names of included files (in loadfilename) and print them upon error

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

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>