did not work with bloody vax assemblerr

This commit is contained in:
ceriel 1987-02-06 14:44:56 +00:00
parent dd673a426f
commit 77f33b6762

View file

@ -2,8 +2,10 @@
ungetc(ch, iop) ungetc(ch, iop)
int ch; int ch;
FILE *iop; register FILE *iop;
{ {
unsigned char *p;
if ( ch < 0 || !io_testflag(iop,IO_READMODE)) if ( ch < 0 || !io_testflag(iop,IO_READMODE))
return EOF; return EOF;
if (iop->_ptr == iop->_buf) { if (iop->_ptr == iop->_buf) {
@ -11,6 +13,7 @@ FILE *iop;
iop->_ptr++; iop->_ptr++;
} }
iop->_count++; iop->_count++;
*--iop->_ptr = ch; p = --(iop->_ptr); /* ??? Bloody vax assembler !!! */
*p = ch;
return(ch); return(ch);
} }