1 /* 2 * Copyright (c) 1980 Regents of the University of California. 3 * All rights reserved. The Berkeley software License Agreement 4 * specifies the terms and conditions for redistribution. 5 */ 6 7 #ifndef lint 8 static char sccsid[] = "@(#)delch.c 5.1 (Berkeley) 06/07/85"; 9 #endif not lint 10 11 # include "curses.ext" 12 13 /* 14 * This routine performs an insert-char on the line, leaving 15 * (_cury,_curx) unchanged. 16 * 17 */ 18 wdelch(win) 19 reg WINDOW *win; { 20 21 reg char *temp1, *temp2; 22 reg char *end; 23 reg int lch; 24 25 end = &win->_y[win->_cury][win->_maxx - 1]; 26 temp1 = &win->_y[win->_cury][win->_curx]; 27 temp2 = temp1 + 1; 28 while (temp1 < end) 29 *temp1++ = *temp2++; 30 *temp1 = ' '; 31 touchline(win, win->_cury, win->_curx, win->_maxx - 1); 32 return OK; 33 } 34