written by Ken Arnold; add Berkeley specific header
[unix-history] / usr / src / lib / libcurses / delch.c
/*
* Copyright (c) 1981 Regents of the University of California.
* All rights reserved.
*
* Redistribution and use in source and binary forms are permitted
* provided that this notice is preserved and that due credit is given
* to the University of California at Berkeley. The name of the University
* may not be used to endorse or promote products derived from this
* software without specific prior written permission. This software
* is provided ``as is'' without express or implied warranty.
*/
#ifndef lint
static char sccsid[] = "@(#)delch.c 5.2 (Berkeley) %G%";
#endif /* not lint */
# include "curses.ext"
/*
* This routine performs an insert-char on the line, leaving
* (_cury,_curx) unchanged.
*
*/
wdelch(win)
reg WINDOW *win; {
reg char *temp1, *temp2;
reg char *end;
reg int lch;
end = &win->_y[win->_cury][win->_maxx - 1];
temp1 = &win->_y[win->_cury][win->_curx];
temp2 = temp1 + 1;
while (temp1 < end)
*temp1++ = *temp2++;
*temp1 = ' ';
touchline(win, win->_cury, win->_curx, win->_maxx - 1);
return OK;
}