//?Parse.cpp:?implementation?of?the?Parse?class.
//
//////////////////////////////////////////////////////////////////////

#include?“stdafx.h“
#include?“Tiny.h“
#include?“Parse.h“

#ifdef?_DEBUG
#undef?THIS_FILE
static?char?THIS_FILE[]=__FILE__;
#define?new?DEBUG_NEW
#endif

//////////////////////////////////////////////////////////////////////
//?Construction/Destruction
//////////////////////////////////////////////////////////////////////

Parse::Parse（）
{
	indentno=0;
	m_Error?=?FALSE;
}

Parse::~Parse（）
{

}

void?Parse::syntaxError（char?*?message）
{?
	fprintf（sc.listing“\n>>>?“）;
	fprintf（sc.listing“Syntax?error?at?line?%d:?%s“sc.linenomessage）;
	m_Error?=?TRUE;
}

void?Parse::match（MyTokenType?expected）
{?
	if?（token?==?expected）?token?=?sc.getToken（）;
	else?{
		syntaxError（“unexpected?token?->?“）;
		sc.printToken（token）;
		fprintf（sc.listing“??????“）;
	}
}

char?*?Parse::copyString（char?*?str）
{
	int?n;
	char?*?t;
	if?（str==NULL）?return?NULL;
	n?=?strlen（str）+1;
	t?=（char?*）?malloc（n）;
	if?（t==NULL）
		fprintf（sc.listing“Out?of?memory?error?at?line?%d\n“sc.lineno）;
	else?strcpy（tstr）;
	return?t;
}

void?Parse::printSpaces（void）
{
	int?i;
	for?（i=0;i		fprintf（sc.listing“?“）;
}

void?Parse::printTree（?TreeNode?*?tree?）
{
	int?i;
	indentno+=2;
	while?（tree?!=?NULL）?{
		printSpaces（）;
		if?（tree->nodekind==StmtK）
		{
			switch?（tree->kind.stmt）?
			{
			case?IfK:
				fprintf（sc.listing“If\n“）;
				break;
			case?RepeatK:
				fprintf（sc.listing“Repeat\n“）;
				break;
			case?AssignK:
				fprintf（sc.listing“Assign?to:?%s\n“tree->attr.name）;
				break;
			case?ReadK:
				fprintf（sc.listing“Read:?%s\n“tree->attr.name）;
				break;
			case?WriteK:
				fprintf（sc.listing“Write\n“）;
				break;
			case?WhileK:
				fprintf（sc.listing“While\n“）;
				break;
			case?DowhileK:
				fprintf（sc.listing“Do\n“）;
				break;
			case?ForIncK:
				fprintf（sc.listing“For（遞增）\n“）;
				break;
			case?ForDecK:
				fprintf（sc.listing“For（遞減）\n“）;
				break;
			default:
				fprintf（sc.listing“Unknown?ExpNode?kind\n“）;
				break;
			}
		}
		else?if?（tree->nodekind==ExpK）
		{?
			switch?（tree->kind.exp）?
			{
			case?OpK:
				fprintf（sc.listing“Op:?“）;
				sc.printToken（tree->attr.op）;
				break;
			case?ConstK:
				fprintf（sc.listing“Const:?%d\n“tree->attr.val）;
				break;
			case?IdK:
				fprintf（sc.listing“Id:?%s\n“tree->attr.name）;
				break;
			default:
				fprintf（sc.listing“Unknown?ExpNode?kind\n“）;
				break;
			}
		}
		else?fprintf（sc.listing“Unknown?node?kind\n“）;
		for?（i=0;i			printTree（tree->child[i]）;
		tree?=?tree->sibling;
	}
	indentno-=2;
}

TreeNode?*?Parse::newStmtNode（StmtKind?kind）
{
	TreeNode?*?t?=?（TreeNode?*）?malloc（sizeof（TreeNode））;
	int?i;
	if?（t==NULL）
		fprintf（sc.listing“Out?of?memory?error?at?line?%d\n“sc.lineno）;
	else?
	{
		for?（i=0;i