File:  [gforth] / gforth / Attic / io.h
Revision 1.4: download - view: text, annotated - select for diffs
Thu Feb 2 18:13:04 1995 UTC (26 years, 11 months ago) by pazsan
Branches: MAIN
CVS tags: HEAD
added very preliminary support for Alpha/osf1
Moved flush-tos before stores to improve scheduling
merged io-dos.h and io.h
Created new Makefile for DOS
removed ToDo topcics that are already done

    1: /* Input driver header */
    2: 
    3: #include <setjmp.h>
    4: 
    5: extern jmp_buf throw_jmp_buf;
    6: 
    7: #ifdef MSDOS
    8: #  define prep_terminal()
    9: #  define deprep_terminal()
   10: #  define install_signal_handlers()
   11: 
   12: #  include <conio.h>
   13: 
   14: #  define key()		getch()
   15: #  define key_query       FLAG(kbhit())
   16: #else
   17: unsigned char getkey(FILE *);
   18: long key_avail(FILE *);
   19: void prep_terminal();
   20: void deprep_terminal();
   21: void install_signal_handlers(void);
   22: 
   23: #  define key()		getkey(stdin)
   24: #  define key_query	-(!!key_avail(stdin)) /* !! FLAG(...)? - anton */
   25:          		/* flag was originally wrong -- lennart */
   26: #endif

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