Return to s_inout.c CVS log

Up to [CSRG BSD Unix] / 43BSD / ingres / source / parser

Annotation of 43BSD/ingres/source/parser/s_inout.c, revision 1.1.1.1

1.1       root        1: # include <ingres.h>
                      2: # include "scanner.h"
                      3: # include      <sccs.h>
                      4: 
                      5: SCCSID(@(#)s_inout.c   8.1     12/31/84)
                      6: 
                      7: /* TWO CHARACTER STACK FOR 'UNGETC' BACKUP */
                      8: char   Pchar[2];
                      9: int    Pctr;
                     10: 
                     11: 
                     12: /*
                     13: ** BACKUP
                     14: ** saves the character argument in the global stack 'Pchar'
                     15: **/
                     16: backup(chr)
                     17: char   chr;
                     18: {
                     19:        extern int      yyline;
                     20: 
                     21:        if (Pctr == 2)
                     22:                syserr("overflow in backup()");
                     23:        Pchar[Pctr++] = chr;
                     24:        if (chr == '\n')
                     25:                yyline--;
                     26: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.