Return to clrtobot.c CVS log

Up to [CSRG BSD Unix] / 42BSD / usr.lib / libcurses

Annotation of 42BSD/usr.lib/libcurses/clrtobot.c, revision 1.1

1.1     ! root        1: # include      "curses.ext"
        !             2: 
        !             3: /*
        !             4:  *     This routine erases everything on the window.
        !             5:  *
        !             6:  * 1/26/81 (Berkeley) @(#)clrtobot.c   1.1
        !             7:  */
        !             8: wclrtobot(win)
        !             9: reg WINDOW     *win; {
        !            10: 
        !            11:        reg int         y;
        !            12:        reg char        *sp, *end, *maxx;
        !            13:        reg int         startx, minx;
        !            14: 
        !            15:        startx = win->_curx;
        !            16:        for (y = win->_cury; y < win->_maxy; y++) {
        !            17:                minx = _NOCHANGE;
        !            18:                end = &win->_y[y][win->_maxx];
        !            19:                for (sp = &win->_y[y][startx]; sp < end; sp++)
        !            20:                        if (*sp != ' ') {
        !            21:                                maxx = sp;
        !            22:                                if (minx == _NOCHANGE)
        !            23:                                        minx = sp - win->_y[y];
        !            24:                                *sp = ' ';
        !            25:                        }
        !            26:                if (minx != _NOCHANGE) {
        !            27:                        if (win->_firstch[y] > minx
        !            28:                             || win->_firstch[y] == _NOCHANGE)
        !            29:                                win->_firstch[y] = minx;
        !            30:                        if (win->_lastch[y] < maxx - win->_y[y])
        !            31:                                win->_lastch[y] = maxx - win->_y[y];
        !            32:                }
        !            33:                startx = 0;
        !            34:        }
        !            35:        win->_curx = win->_cury = 0;
        !            36: }

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