12240Sarnold # include "curses.ext" 22240Sarnold 32240Sarnold /* 42240Sarnold * This routine erases everything on the window. 52240Sarnold * 6*19872Sbloom * @(#)clrtobot.c 1.2 (Berkeley) 05/01/85 72240Sarnold */ 82240Sarnold wclrtobot(win) 92240Sarnold reg WINDOW *win; { 102240Sarnold 112240Sarnold reg int y; 122240Sarnold reg char *sp, *end, *maxx; 132240Sarnold reg int startx, minx; 142240Sarnold 152240Sarnold startx = win->_curx; 162240Sarnold for (y = win->_cury; y < win->_maxy; y++) { 172240Sarnold minx = _NOCHANGE; 182240Sarnold end = &win->_y[y][win->_maxx]; 192240Sarnold for (sp = &win->_y[y][startx]; sp < end; sp++) 202240Sarnold if (*sp != ' ') { 212240Sarnold maxx = sp; 222240Sarnold if (minx == _NOCHANGE) 232240Sarnold minx = sp - win->_y[y]; 242240Sarnold *sp = ' '; 252240Sarnold } 26*19872Sbloom if (minx != _NOCHANGE) 27*19872Sbloom touchline(win, y, minx, maxx - &win->_y[y][startx]); 282240Sarnold startx = 0; 292240Sarnold } 302240Sarnold } 31