Annotation of 43BSD/usr.bin/efl/fixuplex, revision 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: !

unix.superglobalmegacorp.com

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