Return to fixuplex CVS log

Up to [Research Unix] / researchv10no / cmd / efl

Annotation of researchv10no/cmd/efl/fixuplex, revision 1.1

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

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