did not work with bloody vax assemblerr
This commit is contained in:
parent
dd673a426f
commit
77f33b6762
1 changed files with 5 additions and 2 deletions
|
@ -2,8 +2,10 @@
|
|||
|
||||
ungetc(ch, iop)
|
||||
int ch;
|
||||
FILE *iop;
|
||||
register FILE *iop;
|
||||
{
|
||||
unsigned char *p;
|
||||
|
||||
if ( ch < 0 || !io_testflag(iop,IO_READMODE))
|
||||
return EOF;
|
||||
if (iop->_ptr == iop->_buf) {
|
||||
|
@ -11,6 +13,7 @@ FILE *iop;
|
|||
iop->_ptr++;
|
||||
}
|
||||
iop->_count++;
|
||||
*--iop->_ptr = ch;
|
||||
p = --(iop->_ptr); /* ??? Bloody vax assembler !!! */
|
||||
*p = ch;
|
||||
return(ch);
|
||||
}
|
||||
|
|
Loading…
Reference in a new issue