Commit | Line | Data |
---|---|---|
6e1c93d0 | 1 | /* |
2f14f200 KB |
2 | * Copyright (c) 1981 Regents of the University of California. |
3 | * All rights reserved. | |
4 | * | |
c07973a2 | 5 | * %sccs.include.redist.c% |
6e1c93d0 DF |
6 | */ |
7 | ||
8 | #ifndef lint | |
c07973a2 | 9 | static char sccsid[] = "@(#)delch.c 5.4 (Berkeley) %G%"; |
2f14f200 | 10 | #endif /* not lint */ |
6e1c93d0 | 11 | |
8f970554 KA |
12 | # include "curses.ext" |
13 | ||
14 | /* | |
15 | * This routine performs an insert-char on the line, leaving | |
16 | * (_cury,_curx) unchanged. | |
17 | * | |
8f970554 KA |
18 | */ |
19 | wdelch(win) | |
20 | reg WINDOW *win; { | |
21 | ||
22 | reg char *temp1, *temp2; | |
23 | reg char *end; | |
d45d8bdb | 24 | reg int lch; |
8f970554 KA |
25 | |
26 | end = &win->_y[win->_cury][win->_maxx - 1]; | |
4ed74706 KA |
27 | temp1 = &win->_y[win->_cury][win->_curx]; |
28 | temp2 = temp1 + 1; | |
8f970554 KA |
29 | while (temp1 < end) |
30 | *temp1++ = *temp2++; | |
31 | *temp1 = ' '; | |
d45d8bdb | 32 | touchline(win, win->_cury, win->_curx, win->_maxx - 1); |
8f970554 KA |
33 | return OK; |
34 | } |