Files
Arquivotheca.SunOS-4.1.4/ucblib/libcurses/getstr.c
seta75D ff309bfe1c Init
2021-10-11 18:37:13 -03:00

30 lines
593 B
C

/*
* 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[] = "@(#)getstr.c 1.1 94/10/31 SMI"; /* from UCB 5.1 85/06/07 */
#endif not lint
# include "curses.ext"
/*
* This routine gets a string starting at (_cury,_curx)
*
*/
wgetstr(win,str)
reg WINDOW *win;
reg char *str; {
while ((*str = wgetch(win)) != ERR && *str != '\n')
str++;
if (*str == ERR) {
*str = '\0';
return ERR;
}
*str = '\0';
return OK;
}