xref: /original-bsd/lib/libcurses/delch.c (revision 2301fdfb)
1 /*
2  * Copyright (c) 1981 Regents of the University of California.
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms are permitted
6  * provided that the above copyright notice and this paragraph are
7  * duplicated in all such forms and that any documentation,
8  * advertising materials, and other materials related to such
9  * distribution and use acknowledge that the software was developed
10  * by the University of California, Berkeley.  The name of the
11  * University may not be used to endorse or promote products derived
12  * from this software without specific prior written permission.
13  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
14  * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
15  * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
16  */
17 
18 #ifndef lint
19 static char sccsid[] = "@(#)delch.c	5.3 (Berkeley) 06/30/88";
20 #endif /* not lint */
21 
22 # include	"curses.ext"
23 
24 /*
25  *	This routine performs an insert-char on the line, leaving
26  * (_cury,_curx) unchanged.
27  *
28  */
29 wdelch(win)
30 reg WINDOW	*win; {
31 
32 	reg char	*temp1, *temp2;
33 	reg char	*end;
34 	reg int		lch;
35 
36 	end = &win->_y[win->_cury][win->_maxx - 1];
37 	temp1 = &win->_y[win->_cury][win->_curx];
38 	temp2 = temp1 + 1;
39 	while (temp1 < end)
40 		*temp1++ = *temp2++;
41 	*temp1 = ' ';
42 	touchline(win, win->_cury, win->_curx, win->_maxx - 1);
43 	return OK;
44 }
45