cyrill@scicom.AlphaCDC.COM (Cyro Lord) (08/16/89)
I have been trying to get the io part of Mitch Bradley's
forth engine working on a 3b2 with System V2.1. The io.c
file doesn't want to compile as is. I found one function
if calls but can't get past this part:
#ifdef SYSV
int nchars;
char c;
if ( input_file != stdin || (nchars = stdin->_cnt) == 0 ) {
> fcntl( 0, F_SETFL, FNBIO );
> nchars = read( 0, &c, 1 ) > 0;
> fcntl( 0, F_SETFL, 0 );
> if (nchars)
> ungetc(c, stdin);
> }
> return(nchars);
I just know I missed something so let me know what to do trying to work
around this one. The bomb is 'FNBIO'. Should I just define this as
static or something? Any help will stop me from getting older by the
minute. And please reply via email unless some else needs this same help.
-Cyro
--
Cyro Lord Alpha Comm. Dev. Corp. - DOMAIN cyrill@scicom.alphacdc.com
UUCP {ncar,nbires,boulder,isis}!scicom!cyrill
Corn can't expect Justice from a court of chickens. (African Proverb)