int word(char *w) 
{
	const Keyword *kp;
	int c, n;

	n = binsearch(w, keywords, sizeof(keywords)/sizeof(keywords[0]));
/* BUG: this ought to be inside the if; in theory could fault (daniel barrett) */
	kp = keywords + n; /// <- here
	if (n != -1) {	/* found in table */
		yylval.i = kp->sub;
		switch (kp->type) { /* special handling */

$ stty size | awk '{w=$2}END{if(w==0){w=80}print w}'
/public/src.git/external/historical/nawk/bin/../dist/lex.c:476:16: runtime error: index -1 out of bounds for type 'const Keyword [46]'