K&R6-3节例题返回内存错误，请大佬帮忙看看bug在哪？

/*统计输入的文本中关键词的个数*/

#include <stdio.h>

#include <ctype.h>

#include <stdlib.h>

#include <string.h>

#define MAX 999

#define BUFFSIZE 100

char buf[BUFFSIZE];

int bufp=0;			//buf下标

struct key{

	char *keywordlist;

	int keywordnum;

}sweartab[MAX]={

	"auto", 0,

	"break", 0,

	"double", 0,

	"else", 0,

	"float", 0,

	"int", 0,

	"long", 0,

	"char", 0,

	"const", 0,

	"extern", 0,

	"case", 0,

	"for", 0,

	/*etc*/

};



int getwords(char *, int);		//用于读取输入流中单词的函数 

int binsearch(struct key *, char *, int);		

//折半查找函数，寻找sweartab中和输入词相同的元素, 返回该元素的下标 

/*这里第一个参数也是指针，是struct key类型的指针*/ 



/*keytab中关键字的个数*/

int keysum=(sizeof (sweartab))/(sizeof (struct key));



/*函数入口*/

int main (int argc, char **argv)

{

	int list, i;		//list，元素下标 

	char word[MAX];		//储存一个单词 

	while (getwords(word, MAX)!='\n'){		//注意，这里的word是数组名所以有空间存储字符串	

		if (isalpha(*word))

			list=binsearch(sweartab, word, keysum);

		if (list>=0)

			sweartab[list].keywordnum++;

	}

	

	for (i=0;i<keysum;i++)

		printf("%s: %d\n",sweartab[i].keywordlist, sweartab[i].keywordnum);

	free (buf);

	return 0;

}

 



int getch(void)

{

	return (bufp>0) ? *( buf+(--bufp) ) : getchar();

	/*如果buf不是空的，就返回栈顶下面的那层，如果是空的，就接受一个键盘输入*/

}



void ungetch (char c)

{

	if (bufp>BUFFSIZE)

		printf ("ungetch:too many char\n");

	else 		 

		*(buf+(bufp++))=c;		//如果buf没满，就将函数参数存储进buf 

}



/*读取输入的一个单词*/

int getwords(char *word, int lim)	

{		//参数：数组的地址，数组长度的上限 

	int c, i=0;

	char *last=word;	//指向数组各个元素的指针 

	while (isspace(c=getch()))

		;		//跳过空白输出 

	if (c!= '\n')	//第一个非空白输出 

		*last++=c;		//这里将输入的非空白字符送给了当前指针位置并将指针后移了一位 

	if (!isalpha(c)){	//如果c不是字母 

		*last='\0';		//结束字符串 

		return c;		//返回c即返回最后接收到的输入字符 

	}					//如果c是字母 

	for (; --lim>0; last++)

		if (!isalnum(*last=getch())){	//isalnum(int), 判断是否是数字、大小写字母，相当于isalpha(int)||isdigit(int), 当真时返回非零，否则返回0 

		//取下一个输入的字符，若不是字母或数字那么将该字符放入缓冲区并跳出循环 

			ungetch(*last);	//每次用getch获得一个字符存入word数组判断是不是字母数字，不是则放回缓冲区，并退出循环 

			break;

		}

	*last = '\0';	//用0结束字符串 

	return *word;	//返回该单词的首字母 

}



/*折半查找函数, 参数：结构字符地址，目标字符串地址，结构数组元素个数, 

返回和结构字符串列标相同的结构数组下标*/

 int binsearch (struct key *tab, char *s, int len)

{

 	int bot, top, mid, flag;

 	bot=0;

 	top=len-1;

 	mid=(bot+top)/2;

 	while (bot<=top){

 		flag=strcmp((tab+mid)->keywordlist, s); 	//比较列表中字符串和word字符串 

 		if (flag>0){ //tab[mid]>s, 目标字符串在中间上面 

 			top=mid-1;

		}

		else if (flag<0)

			bot=mid+1;

		else

			return mid;

 	}

 	return -1;

}