Return to fixuplex CVS log

Up to [CSRG BSD Unix] / 42BSD / usr.bin / efl

Annotation of 42BSD/usr.bin/efl/fixuplex, revision 1.1.1.1

1.1       root        1: #! /bin/sh
                      2: ed - lex.yy.c <<!
                      3: /input/s/getc(yyin)/efgetc/
                      4: /yylex/+1a
                      5: if(pushlex)
                      6:        if(pushlex==1)
                      7:                {
                      8:                pushlex = 2;
                      9:                yylval.ival = 0;
                     10:                return(EOS);
                     11:                }
                     12:        else    {
                     13:                pushlex = 0;
                     14:                if(rket == 2)
                     15:                        rket = 1;
                     16:                else    RETL(prevv,prevl);
                     17:                }
                     18: if(rket > 0)
                     19:        {
                     20:        if(rket==1)
                     21:                {
                     22:                rket = 2;
                     23:                RET(RBRACK);
                     24:                }
                     25:        else    {
                     26:                rket = 0;
                     27:                RET(EOS);
                     28:                }
                     29:        }
                     30: if(eofneed) return(0);
                     31: if(forcerr) return(-1);
                     32: .
                     33: w
                     34: q
                     35: !

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