Return to less.c CVS log

Up to [MW Coherent from dump] / coherent / a / usr / src / libl

Annotation of coherent/a/usr/src/libl/less.c, revision 1.1.1.1

1.1       root        1: /* (-lgl
                      2:  *     COHERENT Version 3.1
                      3:  *     Copyright (c) 1982, 1990 by Mark Williams Company.
                      4:  *     All rights reserved. May not be copied without permission.
                      5:  -lgl) */
                      6: #include "lexlib.h"
                      7: yyless(n)
                      8: {
                      9:        if (n < 0)
                     10:                return;
                     11:        if (yyleng-n+qct(ll_tq) > QSIZE)
                     12:                error(inpovf);
                     13:        while (yyleng > n) {
                     14:                qug(ll_tq, yytext[--yyleng]);
                     15:                if (ll_tlen)
                     16:                        --ll_tlen;
                     17:        }
                     18:        if (yyleng)
                     19:                ll_lc = yytext[yyleng-1];
                     20:        yytext[yyleng] = '\0';
                     21: }

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