Return to getstr.c CVS log

Up to [Power 6/32 Unix Tahoe 4.2BSD] / cci / usr / src / usr.lib / libcurses

Power 6/32 Unix version 1.21

# include	"curses.ext"

/*
 *	This routine gets a string starting at (_cury,_curx)
 *
 * 6/21/83 (Berkeley) @(#)getstr.c	1.4
 */
wgetstr(win,str)
reg WINDOW	*win; 
reg char	*str; {

	while ((*str = wgetch(win)) != ERR && *str != '\n' && *str != '\r')
		str++;
	if (*str == ERR) {
		*str = '\0';
		return ERR;
	}
	*str = '\0';
	return OK;
}

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.