chrissy
/
P8000
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

add LCC - a better C-Compiler for WEGA

This commit is contained in:
Oliver Lehmann 1985-11-11 00:24:29 +00:00
parent f03523b62a
commit 745b5a4d46
1 changed files with 39 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

39
WEGA/contrib/lcc/contrib/libcurses/clrtobot.c Normal file
View File

@ -0,0 +1,39 @@
/*
* Copyright (c) 1980 Regents of the University of California.
* All rights reserved. The Berkeley software License Agreement
* specifies the terms and conditions for redistribution.
*/
#ifndef lint
static char sccsid[] = "@(#)clrtobot.c 5.2 (Berkeley) 10/24/85";
#endif not lint
# include "curses.ext"
/*
* This routine erases everything on the window.
*
*/
wclrtobot(win)
reg WINDOW *win; {
reg int y;
reg char *sp, *end, *maxx;
reg int startx, minx;
startx = win->_curx;
for (y = win->_cury; y < win->_maxy; y++) {
minx = _NOCHANGE;
end = &win->_y[y][win->_maxx];
for (sp = &win->_y[y][startx]; sp < end; sp++)
if (*sp != ' ') {
maxx = sp;
if (minx == _NOCHANGE)
minx = sp - win->_y[y];
*sp = ' ';
}
if (minx != _NOCHANGE)
touchline(win, y, minx, maxx - &win->_y[y][0]);
startx = 0;
}
}