X-Git-Url: http://git.subgeniuskitty.com/pforth/.git/blobdiff_plain/a1f4e52df60d8f26327ed57f5a9e7b70d0a04273..8e9db35f299d8f606ba003d3cd8fa9e2c868c880:/csrc/stdio/pf_io_stdio.c diff --git a/csrc/stdio/pf_io_stdio.c b/csrc/stdio/pf_io_stdio.c index 75decfc..6d70a6b 100644 --- a/csrc/stdio/pf_io_stdio.c +++ b/csrc/stdio/pf_io_stdio.c @@ -1,57 +1,57 @@ -/* $Id$ */ -/*************************************************************** -** I/O subsystem for PForth for common systems. -** -** Author: Phil Burk -** Copyright 1994 3DO, Phil Burk, Larry Polansky, David Rosenboom -** -** The pForth software code is dedicated to the public domain, -** and any third party may reproduce, distribute and modify -** the pForth software code or any derivative works thereof -** without any compensation or license. The pForth software -** code is provided on an "as is" basis without any warranty -** of any kind, including, without limitation, the implied -** warranties of merchantability and fitness for a particular -** purpose and their equivalents under the laws of any jurisdiction. -** -**************************************************************** -** 941004 PLB Extracted IO calls from pforth_main.c -***************************************************************/ - -#include "../pf_all.h" - -/* Default portable terminal I/O. */ -int sdTerminalOut( char c ) -{ - return putchar(c); -} -/* We don't need to echo because getchar() echos. */ -int sdTerminalEcho( char c ) -{ - return 0; -} -int sdTerminalIn( void ) -{ - return getchar(); -} -int sdQueryTerminal( void ) -{ - return 0; -} - -int sdTerminalFlush( void ) -{ -#ifdef PF_NO_FILEIO - return -1; -#else - return fflush(PF_STDOUT); -#endif -} - -void sdTerminalInit( void ) -{ -} -void sdTerminalTerm( void ) -{ -} - +/* $Id$ */ +/*************************************************************** +** I/O subsystem for PForth for common systems. +** +** Author: Phil Burk +** Copyright 1994 3DO, Phil Burk, Larry Polansky, David Rosenboom +** +** The pForth software code is dedicated to the public domain, +** and any third party may reproduce, distribute and modify +** the pForth software code or any derivative works thereof +** without any compensation or license. The pForth software +** code is provided on an "as is" basis without any warranty +** of any kind, including, without limitation, the implied +** warranties of merchantability and fitness for a particular +** purpose and their equivalents under the laws of any jurisdiction. +** +**************************************************************** +** 941004 PLB Extracted IO calls from pforth_main.c +***************************************************************/ + +#include "../pf_all.h" + +/* Default portable terminal I/O. */ +int sdTerminalOut( char c ) +{ + return putchar(c); +} +/* We don't need to echo because getchar() echos. */ +int sdTerminalEcho( char c ) +{ + return 0; +} +int sdTerminalIn( void ) +{ + return getchar(); +} +int sdQueryTerminal( void ) +{ + return 0; +} + +int sdTerminalFlush( void ) +{ +#ifdef PF_NO_FILEIO + return -1; +#else + return fflush(PF_STDOUT); +#endif +} + +void sdTerminalInit( void ) +{ +} +void sdTerminalTerm( void ) +{ +} +