[gforth] / gforth / Attic / io-dos.h  

gforth: gforth/Attic/io-dos.h


1 : anton 1.2 /* Input driver header
2 :    
3 :     Copyright (C) 1995 Free Software Foundation, Inc.
4 :    
5 :     This file is part of Gforth.
6 :    
7 :     Gforth is free software; you can redistribute it and/or
8 :     modify it under the terms of the GNU General Public License
9 :     as published by the Free Software Foundation; either version 2
10 :     of the License, or (at your option) any later version.
11 :    
12 :     This program is distributed in the hope that it will be useful,
13 :     but WITHOUT ANY WARRANTY; without even the implied warranty of
14 :     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 :     GNU General Public License for more details.
16 :    
17 :     You should have received a copy of the GNU General Public License
18 :     along with this program; if not, write to the Free Software
19 :     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
20 :     */
21 : pazsan 1.1
22 :     #define prep_terminal()
23 :     #define deprep_terminal()
24 :     #define install_signal_handlers()
25 :    
26 :     #include <conio.h>
27 :     #include <setjmp.h>
28 :    
29 :     extern jmp_buf throw_jmp_buf;
30 :    
31 :     #define key() getch()
32 :     #define key_query FLAG(kbhit())

CVS Admin

Powered by ViewCVS 1.0-dev
(Powered by ViewCVS)

ViewCVS and CVS Help