gettype.h

一个简单的词法分析程序。是编译原理的部分课程设计。因为时间有限。未能完成全部。如果有朋友改了代码或添加了功能使代码更加完善。请与我联系：[e-mail]谢谢. 做的不是

/*=============================================
**             2005-8-30					**
**			  获得token所对应的类型信息  	**
**			 lizhu zhang					**
=============================================*/
/*=============================================
**函数用能：获得token所对应的类型信息
**参数说明:[in]:token码
**返回值  :token所对应的类型信息
**===========================================*/
char * FGetType(const int code)
{
	switch(code)
	{
	case 2:
		return "array";
	case 4:
		return "bool";
	case 7:
		return "char";
	case 16:
		return "integer";
	case 24:
		return "real";
	default:
		return "";
	}
}