did not work with bloody vax assemblerr
authorceriel <none@none>
Fri, 6 Feb 1987 14:44:56 +0000 (14:44 +0000)
committerceriel <none@none>
Fri, 6 Feb 1987 14:44:56 +0000 (14:44 +0000)
lang/cem/libcc/stdio/ungetc.c

index ee88bf2..ef19196 100644 (file)
@@ -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);
 }