#ifndef __AST_GENERATOR_H__
#define __AST_GENERATOR_H__

class generator
{
	private:
		abstract_syntax_tree root;
		std::stack<token> parse;
		token this_token;
	public:
		generator()
		{
			this_token.type=0;
			root.set_root();
		}
		void get_token()
		{
			if(parse.empty())
			{
				this_token.type=0;
				return;
			}
			this_token=parse.top();
			parse.pop();
			return;
		}
		void set_ast_empty()
		{
			root.tree_set_clear();
			return;
		}
		void gen_process(std::list<token>& lexer)
		{
			while(!parse.empty())
				parse.pop();
			std::stack<token> temp;
			for(std::list<token>::iterator i=lexer.begin();i!=lexer.end();++i)
			{
				token temp_parse;
				temp_parse=*i;
				temp.push(temp_parse);//push this into stack
			}
			if(temp.empty())
			{
				std::cout<<">>[Abstract-syntax-tree] warning: empty lexer list."<<std::endl;
				return;
			}
			while(!temp.empty())
			{
				parse.push(temp.top());
				temp.pop();
			}
			return;
		}
		void print_ast()
		{
			std::cout<<">>\n[Abstract-syntax-tree]"<<std::endl;
			root.print_ast_node(0);
			return;
		}
		void run()
		{
			
			return;
		}
		void gen_main_work();
		abstract_syntax_tree in_curve_calc_expr();
		abstract_syntax_tree number_begin_expr();
		abstract_syntax_tree string_begin_expr();
		abstract_syntax_tree identifier_begin_expr();
		abstract_syntax_tree call_list_expr();
		abstract_syntax_tree call_function_expr();
		abstract_syntax_tree call_hash_expr();
		abstract_syntax_tree list_generate_expr();
		abstract_syntax_tree hash_generate_expr();
		abstract_syntax_tree definition_expr();
		abstract_syntax_tree assignment_expr();
		abstract_syntax_tree loop_expr();
		abstract_syntax_tree continue_break_expr();
		bool else_if_check();
		abstract_syntax_tree if_else_expr();
		abstract_syntax_tree add_sub_operator_expr();
		abstract_syntax_tree mul_div_operator_expr();
		abstract_syntax_tree link_operator_expr();
		abstract_syntax_tree compare_operator_expr();
		abstract_syntax_tree one_operator_expr();
		void check_semi_at_end();
		abstract_syntax_tree statements_block();
		abstract_syntax_tree function_generate_expr();
		abstract_syntax_tree return_expr();
};
void generator::check_semi_at_end()
{
	get_token();
	return;
}
abstract_syntax_tree generator::return_expr()
{
	abstract_syntax_tree node;
	
	get_token();
	switch(this_token.type)
	{
		case __number:node.set_node_to_ret(number_begin_expr());;break;
		case __string:node.set_node_to_ret(string_begin_expr());;break;
		case __id:node.set_node_to_ret(identifier_begin_expr());;break;
		case __func:node.set_node_to_ret(function_generate_expr());;break;
		case __left_bracket:node.set_node_to_ret(list_generate_expr());;break;
		case __left_brace:node.set_node_to_ret(hash_generate_expr());;break;
		case __semi:parse.push(this_token);node.set_node_to_ret(node);break;
		default:break;
	}
	return node;
}
abstract_syntax_tree generator::statements_block()
{
	abstract_syntax_tree node;
	node.set_block();
	get_token();
	get_token();
	while(this_token.type!=__right_brace)
	{
		token t;
		switch(this_token.type)
		{
			case __var:node.add_statement(definition_expr());check_semi_at_end();break;
			case __id:node.add_statement(identifier_begin_expr());check_semi_at_end();break;
			case __number:node.add_statement(number_begin_expr());check_semi_at_end();break;
			case __string:node.add_statement(string_begin_expr());check_semi_at_end();break;
			case __if:parse.push(this_token);node.add_statement(if_else_expr());break;
			case __left_curve:
				t=this_token;
				get_token();
				if(this_token.type==__var)
				{
					parse.push(t);
					node.add_statement(definition_expr());
				}
				else
				{
					parse.push(this_token);
					node.add_statement(in_curve_calc_expr());
				}
				check_semi_at_end();
				break;
			case __add_operator:
			case __sub_operator:
			case __nor_operator:node.add_statement(one_operator_expr());break;
			case __while:
			case __for:
			case __foreach:
			case __forindex:parse.push(this_token);node.add_statement(loop_expr());break;
			case __continue:
			case __break:node.add_statement(continue_break_expr());check_semi_at_end();break;
			case __semi:break;
			case __return:node.add_statement(return_expr());check_semi_at_end();break;
			default:break;
		}
		get_token();
	}
	return node;
}
abstract_syntax_tree generator::function_generate_expr()
{
	abstract_syntax_tree node;
	std::list<abstract_syntax_tree> parameters;
	get_token();
	if(this_token.type==__left_brace)
		parse.push(this_token);
	else if(this_token.type==__left_curve)
	{
		get_token();
		while(this_token.type!=__right_curve)
		{
			if(this_token.type==__id)
			{
				abstract_syntax_tree param;
				param.set_node_to_id(this_token.content);
				parameters.push_back(param);
				get_token();
				if(this_token.type==__right_curve)
					parse.push(this_token);
			}
			else if(this_token.type==__dynamic_id)
			{
				abstract_syntax_tree param;
				param.set_node_to_dynid(this_token.content);
				parameters.push_back(param);
				get_token();
				parse.push(this_token);
			}
			get_token();
		}
	}
	node.set_node_to_function(parameters,statements_block());
	return node;
}
abstract_syntax_tree generator::list_generate_expr()
{
	abstract_syntax_tree node;
	std::list<abstract_syntax_tree> list_members;
	get_token();
	while(this_token.type!=__right_bracket)
	{
		switch(this_token.type)
		{
			case __number:list_members.push_back(number_begin_expr());break;
			case __string:list_members.push_back(string_begin_expr());break;
			case __id:list_members.push_back(identifier_begin_expr());break;
			case __left_bracket:list_members.push_back(list_generate_expr());break;
			case __left_brace:list_members.push_back(hash_generate_expr());break;
			case __left_curve:list_members.push_back(in_curve_calc_expr());break;
			default:break;
		}
		get_token();
		if(this_token.type==__comma)
			get_token();
	}
	node.set_node_to_list(list_members);
	return node;
}
abstract_syntax_tree generator::hash_generate_expr()
{
	abstract_syntax_tree node;
	std::list<abstract_syntax_tree> hashmember;
	abstract_syntax_tree elem;
	std::string id_name;
	get_token();
	while(this_token.type!=__right_brace)
	{
		switch(this_token.type)
		{
			// case __number:number_begin_expr();break;
			// case __string:string_begin_expr();break;
			case __id:id_name=this_token.content;break;
			default:break;
		}
		get_token();
		get_token();
		switch(this_token.type)
		{
			case __number:elem.set_node_to_hashmember(id_name,number_begin_expr());break;
			case __string:elem.set_node_to_hashmember(id_name,string_begin_expr());break;
			case __id:elem.set_node_to_hashmember(id_name,identifier_begin_expr());break;
			case __func:elem.set_node_to_hashmember(id_name,function_generate_expr());break;
			case __left_bracket:elem.set_node_to_hashmember(id_name,list_generate_expr());break;
			case __left_brace:elem.set_node_to_hashmember(id_name,hash_generate_expr());break;
			case __left_curve:elem.set_node_to_hashmember(id_name,in_curve_calc_expr());break;
			default:break;
		}
		hashmember.push_back(elem);
		get_token();
		if(this_token.type==__comma)
			get_token();
	}
	node.set_node_to_hash(hashmember);
	return node;
}
abstract_syntax_tree generator::definition_expr()
{
	abstract_syntax_tree node;
	abstract_syntax_tree id;
	std::list<abstract_syntax_tree> name_list;
	std::list<abstract_syntax_tree> var_content;

	get_token();
	if(this_token.type==__left_curve)
	{
		while(this_token.type!=__right_curve)
		{
			get_token();
			id.set_node_to_id(this_token.content);
			name_list.push_back(id);
			get_token();
			if(this_token.type==__right_curve)
				break;
		}
	}
	else if(this_token.type==__id)
	{
		id.set_node_to_id(this_token.content);
		name_list.push_back(id);
	}
	get_token();
	if(this_token.type==__semi)
	{
		parse.push(this_token);
		node.set_definition_expr(name_list,var_content);
		return node;
	}
	get_token();
	token t;
	t.line=this_token.line;
	t.type=__semi;
	
	switch(this_token.type)
	{
		case __number:var_content.push_back(number_begin_expr());break;
		case __string:var_content.push_back(string_begin_expr());break;
		case __id:var_content.push_back(identifier_begin_expr());break;
		case __func:var_content.push_back(function_generate_expr());parse.push(t);break;
		case __add_operator:
		case __sub_operator:
		case __nor_operator:var_content.push_back(one_operator_expr());break;
		case __left_bracket:var_content.push_back(list_generate_expr());break;
		case __left_brace:var_content.push_back(hash_generate_expr());break;
		case __left_curve:var_content.push_back(in_curve_calc_expr());break;
		default:break;
	}
	node.set_definition_expr(name_list,var_content);
	return node;
}
abstract_syntax_tree generator::assignment_expr()
{
	abstract_syntax_tree node;
	std::list<abstract_syntax_tree> to_be_changed;
	std::list<abstract_syntax_tree> var_content;
	get_token();
	switch(this_token.type)
	{
		case __number:number_begin_expr();break;
		case __string:string_begin_expr();break;
		case __id:identifier_begin_expr();break;
		case __func:function_generate_expr();break;
		case __add_operator:
		case __sub_operator:
		case __nor_operator:one_operator_expr();break;
		case __left_bracket:list_generate_expr();break;
		case __left_brace:hash_generate_expr();break;
		case __left_curve:in_curve_calc_expr();break;
		default:break;
	}
	node.set_assignment_expr(to_be_changed,var_content);
	return node;
}
bool generator::else_if_check()
{
	token temp=this_token;
	if(this_token.type!=__else)
		return false;
	else
	{
		get_token();
		if(this_token.type!=__if)
		{
			parse.push(this_token);
			this_token=temp;// to avoid when recognizing 'else' without 'if' 
			
			return false;
		}
	}
	return true;
}
abstract_syntax_tree generator::if_else_expr()
{
	abstract_syntax_tree node;
	get_token();
	get_token();
	get_token();
	switch(this_token.type)
	{
		case __add_operator:
		case __sub_operator:
		case __nor_operator:one_operator_expr();break;
		case __number:number_begin_expr();break;
		case __string:string_begin_expr();break;
		case __id:identifier_begin_expr();break;
		case __left_curve:in_curve_calc_expr();break;
		default:break;
	}
	get_token();
	get_token();
	if(this_token.type==__left_brace)
	{
		// if without { then only one statement is behind it
		parse.push(this_token);
		statements_block();
	}
	else
	{
		token t;
		switch(this_token.type)
		{
			case __var:definition_expr();check_semi_at_end();break;
			case __id:identifier_begin_expr();check_semi_at_end();break;
			case __number:number_begin_expr();check_semi_at_end();break;
			case __string:string_begin_expr();check_semi_at_end();break;
			case __if:parse.push(this_token);if_else_expr();break;
			case __left_curve:
				t=this_token;
				get_token();
				if(this_token.type==__var)
				{
					parse.push(t);
					definition_expr();
				}
				else
				{
					in_curve_calc_expr();
				}
				check_semi_at_end();
				break;
			case __add_operator:
			case __sub_operator:
			case __nor_operator:one_operator_expr();break;
			case __while:
			case __for:
			case __foreach:
			case __forindex:parse.push(this_token);loop_expr();break;
			case __continue:
			case __break:check_semi_at_end();break;
			case __semi:break;
			case __return:return_expr();check_semi_at_end();break;
			default:break;
		}
	}
	if(parse.empty())
		return node;
	get_token();
	while(this_token.type==__elsif || else_if_check())
	{
		get_token();
		get_token();
		switch(this_token.type)
		{
			case __add_operator:
			case __sub_operator:
			case __nor_operator:one_operator_expr();break;
			case __number:number_begin_expr();break;
			case __string:string_begin_expr();break;
			case __id:identifier_begin_expr();break;
			default:break;
		}
		get_token();
		get_token();
		if(this_token.type==__left_brace)
		{
			// if without { then only one statement is behind it
			parse.push(this_token);
			statements_block();
		}
		else
		{
			token t;
			switch(this_token.type)
			{
				case __var:definition_expr();check_semi_at_end();break;
				case __id:identifier_begin_expr();check_semi_at_end();break;
				case __number:number_begin_expr();check_semi_at_end();break;
				case __string:string_begin_expr();check_semi_at_end();break;
				case __if:parse.push(this_token);if_else_expr();break;
				case __left_curve:
					t=this_token;
					get_token();
					if(this_token.type==__var)
					{
						parse.push(t);
						definition_expr();
					}
					else
					{
						in_curve_calc_expr();
					}
					check_semi_at_end();
					break;
				case __add_operator:
				case __sub_operator:
				case __nor_operator:one_operator_expr();break;
				case __while:
				case __for:
				case __foreach:
				case __forindex:parse.push(this_token);loop_expr();break;
				case __continue:
				case __break:check_semi_at_end();break;
				case __semi:break;
				case __return:return_expr();check_semi_at_end();break;
				default:break;
			}
		}
		if(parse.empty())
			return node;
		get_token();
	}
	if(this_token.type==__else)
	{
		get_token();
		if(this_token.type==__left_brace)
		{
			// if without { then only one statement is behind it
			parse.push(this_token);
			statements_block();
		}
		else
		{
			token t;
			switch(this_token.type)
			{
				case __var:definition_expr();check_semi_at_end();break;
				case __id:identifier_begin_expr();check_semi_at_end();break;
				case __number:number_begin_expr();check_semi_at_end();break;
				case __string:string_begin_expr();check_semi_at_end();break;
				case __if:parse.push(this_token);if_else_expr();break;
				case __left_curve:
					t=this_token;
					get_token();
					if(this_token.type==__var)
					{
						parse.push(t);
						definition_expr();
					}
					else
					{
						in_curve_calc_expr();
					}
					check_semi_at_end();
					break;
				case __add_operator:
				case __sub_operator:
				case __nor_operator:one_operator_expr();break;
				case __while:
				case __for:
				case __foreach:
				case __forindex:parse.push(this_token);loop_expr();break;
				case __continue:
				case __break:check_semi_at_end();break;
				case __semi:break;
				case __return:return_expr();check_semi_at_end();break;
				default:break;
			}
		}
	}
	else
		parse.push(this_token);
	return node;
}
abstract_syntax_tree generator::loop_expr()
{
	abstract_syntax_tree node;
	get_token();
	if(this_token.type==__while)
	{
		get_token();
		get_token();
		switch(this_token.type)
		{
			case __add_operator:
			case __sub_operator:
			case __nor_operator:one_operator_expr();break;
			case __number:number_begin_expr();break;
			case __string:string_begin_expr();break;
			case __id:identifier_begin_expr();break;
			case __left_curve:in_curve_calc_expr();break;
			default:break;
		}
		get_token();
		get_token();
		if(this_token.type==__left_brace)
		{
			// if without { then only one statement is behind it
			parse.push(this_token);
			statements_block();
		}
		else
		{
			token t;
			switch(this_token.type)
			{
				case __var:definition_expr();check_semi_at_end();break;
				case __id:identifier_begin_expr();check_semi_at_end();break;
				case __number:number_begin_expr();check_semi_at_end();break;
				case __string:string_begin_expr();check_semi_at_end();break;
				case __if:parse.push(this_token);if_else_expr();break;
				case __left_curve:
					t=this_token;
					get_token();
					if(this_token.type==__var)
					{
						parse.push(t);
						definition_expr();
					}
					else
					{
						in_curve_calc_expr();
					}
					check_semi_at_end();
					break;
				case __add_operator:
				case __sub_operator:
				case __nor_operator:one_operator_expr();break;
				case __while:
				case __for:
				case __foreach:
				case __forindex:parse.push(this_token);loop_expr();break;
				case __continue:
				case __break:check_semi_at_end();break;
				case __semi:break;
				case __return:return_expr();check_semi_at_end();break;
				default:break;
			}
		}
	}
	else if(this_token.type==__for)
	{
		get_token();
		get_token();
		switch(this_token.type)
		{
			case __var:definition_expr();break;
			case __id:identifier_begin_expr();break;
			case __semi:parse.push(this_token);break;
			default:break;
		}
		check_semi_at_end();
		get_token();
		switch(this_token.type)
		{
			case __add_operator:
			case __sub_operator:
			case __nor_operator:one_operator_expr();break;
			case __id:identifier_begin_expr();break;
			case __number:number_begin_expr();break;
			case __string:string_begin_expr();break;
			case __left_curve:in_curve_calc_expr();break;
			case __semi:parse.push(this_token);break;
			default:break;
		}
		check_semi_at_end();
		get_token();
		switch(this_token.type)
		{
			case __id:identifier_begin_expr();break;
			case __number:number_begin_expr();break;
			case __string:string_begin_expr();break;
			case __left_curve:in_curve_calc_expr();break;
			case __right_curve:parse.push(this_token);break;
			default:break;
		}
		get_token();
		get_token();
		if(this_token.type==__left_brace)
		{
			// if without { then only one statement is behind it
			parse.push(this_token);
			statements_block();
		}
		else
		{
			token t;
			switch(this_token.type)
			{
				case __var:definition_expr();check_semi_at_end();break;
				case __id:identifier_begin_expr();check_semi_at_end();break;
				case __number:number_begin_expr();check_semi_at_end();break;
				case __string:string_begin_expr();check_semi_at_end();break;
				case __if:parse.push(this_token);if_else_expr();break;
				case __left_curve:
					t=this_token;
					get_token();
					if(this_token.type==__var)
					{
						parse.push(t);
						definition_expr();
					}
					else
					{
						in_curve_calc_expr();
					}
					check_semi_at_end();
					break;
				case __add_operator:
				case __sub_operator:
				case __nor_operator:one_operator_expr();break;
				case __while:
				case __for:
				case __foreach:
				case __forindex:parse.push(this_token);loop_expr();break;
				case __continue:
				case __break:check_semi_at_end();break;
				case __semi:break;
				case __return:return_expr();check_semi_at_end();break;
				default:break;
			}
		}
	}
	else if(this_token.type==__forindex || this_token.type==__foreach)
	{
		get_token();
		get_token();
		switch(this_token.type)
		{
			case __var:definition_expr();break;
			case __id:identifier_begin_expr();break;
			case __semi:parse.push(this_token);break;
			default:break;
		}
		check_semi_at_end();
		get_token();
		switch(this_token.type)
		{
			case __id:identifier_begin_expr();break;
			case __number:number_begin_expr();break;
			case __string:string_begin_expr();break;
			case __left_curve:in_curve_calc_expr();break;
			case __left_bracket:list_generate_expr();break;
			case __right_curve:parse.push(this_token);break;
			default:break;
		}
		get_token();
		get_token();
		if(this_token.type==__left_brace)
		{
			// if without { then only one statement is behind it
			parse.push(this_token);
			statements_block();
		}
		else
		{
			token t;
			switch(this_token.type)
			{
				case __var:definition_expr();check_semi_at_end();break;
				case __id:identifier_begin_expr();check_semi_at_end();break;
				case __number:number_begin_expr();check_semi_at_end();break;
				case __string:string_begin_expr();check_semi_at_end();break;
				case __if:parse.push(this_token);if_else_expr();break;
				case __left_curve:
					t=this_token;
					get_token();
					if(this_token.type==__var)
					{
						parse.push(t);
						definition_expr();
					}
					else
					{
						in_curve_calc_expr();
					}
					check_semi_at_end();
					break;
				case __add_operator:
				case __sub_operator:
				case __nor_operator:one_operator_expr();break;
				case __while:
				case __for:
				case __foreach:
				case __forindex:parse.push(this_token);loop_expr();break;
				case __continue:
				case __break:check_semi_at_end();break;
				case __semi:break;
				case __return:return_expr();check_semi_at_end();break;
				default:break;
			}
		}
	}
	node.set_node_to_loop();
	return node;
}
abstract_syntax_tree generator::continue_break_expr()
{
	abstract_syntax_tree node;
	node.set_node_to_continue_break(this_token.type);
	return node;
}
abstract_syntax_tree generator::add_sub_operator_expr()
{
	abstract_syntax_tree node;
	get_token();
	switch(this_token.type)
	{
		case __number:node=number_begin_expr();break;
		case __string:node=string_begin_expr();break;
		case __id:node=identifier_begin_expr();break;
		case __left_curve:node=in_curve_calc_expr();break;
		default:break;
	}
	return node;
}
abstract_syntax_tree generator::mul_div_operator_expr()
{
	abstract_syntax_tree node;
	get_token();
	switch(this_token.type)
	{
		case __number:node=number_begin_expr();break;
		case __string:node=string_begin_expr();break;
		case __id:node=identifier_begin_expr();break;
		case __left_curve:node=in_curve_calc_expr();break;
		default:break;
	}
	return node;
}
abstract_syntax_tree generator::link_operator_expr()
{
	abstract_syntax_tree node;
	get_token();
	switch(this_token.type)
	{
		case __number:node=number_begin_expr();break;
		case __string:node=string_begin_expr();break;
		case __id:node=identifier_begin_expr();break;
		case __left_curve:node=in_curve_calc_expr();break;
		default:break;
	}
	return node;
}
abstract_syntax_tree generator::compare_operator_expr()
{
	abstract_syntax_tree node;
	get_token();
	switch(this_token.type)
	{
		case __number:node=number_begin_expr();break;
		case __string:node=string_begin_expr();break;
		case __id:node=identifier_begin_expr();break;
		case __left_curve:node=in_curve_calc_expr();break;
		case __add_operator:
		case __sub_operator:
		case __nor_operator:node=one_operator_expr();break;
		default:break;
	}
	return node;
}
abstract_syntax_tree generator::one_operator_expr()
{
	abstract_syntax_tree node;
	int type=this_token.type;
	get_token();
	switch(this_token.type)
	{
		case __number:node.set_one_operator(type,number_begin_expr());;break;
		case __string:node.set_one_operator(type,string_begin_expr());break;
		case __id:node.set_one_operator(type,identifier_begin_expr());break;
		case __left_curve:node.set_one_operator(type,in_curve_calc_expr());break;
		default:break;
	}
	return node;
}
abstract_syntax_tree generator::in_curve_calc_expr()
{
	abstract_syntax_tree node;
	get_token();
	switch(this_token.type)
	{
		case __add_operator:
		case __sub_operator:
		case __nor_operator:node=one_operator_expr();break;
		case __number:node=number_begin_expr();break;
		case __string:node=string_begin_expr();break;
		case __id:node=identifier_begin_expr();break;
		case __left_curve:node=in_curve_calc_expr();break;
		default:parse.push(this_token);break;
	}
	get_token();
	get_token();
	int temp_type=this_token.type;
	switch(this_token.type)
	{
		case __add_operator:
		case __sub_operator:node.set_two_operator(temp_type,node,add_sub_operator_expr());break;
		case __mul_operator:
		case __div_operator:node.set_two_operator(temp_type,node,mul_div_operator_expr());break;
		case __link_operator:node.set_two_operator(temp_type,node,link_operator_expr());break;
		case __and_operator:
		case __or_operator:
		case __cmp_equal:
		case __cmp_not_equal:
		case __cmp_less:
		case __cmp_more:
		case __cmp_less_or_equal:
		case __cmp_more_or_equal:node.set_two_operator(temp_type,node,compare_operator_expr());break;
		default:parse.push(this_token);break;
	}
	return node;
}
abstract_syntax_tree generator::number_begin_expr()
{
	abstract_syntax_tree node;
	node.set_node_to_number(this_token.content);
	get_token();
	int temp_type=this_token.type;
	switch(this_token.type)
	{
		case __add_operator:
		case __sub_operator:node.set_two_operator(temp_type,node,add_sub_operator_expr());break;
		case __mul_operator:
		case __div_operator:node.set_two_operator(temp_type,node,mul_div_operator_expr());break;
		case __link_operator:node.set_two_operator(temp_type,node,link_operator_expr());break;
		case __and_operator:
		case __or_operator:
		case __cmp_equal:
		case __cmp_not_equal:
		case __cmp_less:
		case __cmp_more:
		case __cmp_less_or_equal:
		case __cmp_more_or_equal:node.set_two_operator(temp_type,node,compare_operator_expr());break;
		default:parse.push(this_token);break;
	}
	return node;
}
abstract_syntax_tree generator::string_begin_expr()
{
	abstract_syntax_tree node;
	node.set_node_to_string(this_token.content);
	get_token();
	int temp_type=this_token.type;
	switch(this_token.type)
	{
		case __add_operator:
		case __sub_operator:node.set_two_operator(temp_type,node,add_sub_operator_expr());break;
		case __mul_operator:
		case __div_operator:node.set_two_operator(temp_type,node,mul_div_operator_expr());break;
		case __link_operator:node.set_two_operator(temp_type,node,link_operator_expr());break;
		case __and_operator:
		case __or_operator:
		case __cmp_equal:
		case __cmp_not_equal:
		case __cmp_less:
		case __cmp_more:
		case __cmp_less_or_equal:
		case __cmp_more_or_equal:node.set_two_operator(temp_type,node,compare_operator_expr());break;
		default:parse.push(this_token);break;
	}
	return node;
}
abstract_syntax_tree generator::call_list_expr()
{
	abstract_syntax_tree node;
	get_token();
	switch(this_token.type)
	{
		case __number:number_begin_expr();break;
		case __string:string_begin_expr();break;
		case __id:identifier_begin_expr();break;
		case __left_curve:in_curve_calc_expr();break;
		default:break;
	}
	get_token();
	if(this_token.type==__colon)// to check if there is [number:number] or [number:]
	{
		get_token();
		switch(this_token.type)
		{
			case __number:number_begin_expr();break;
			case __string:string_begin_expr();break;
			case __id:identifier_begin_expr();break;
			case __left_curve:in_curve_calc_expr();break;
			case __right_bracket:break;// this is [number:]
		}
		get_token();
		get_token();
		switch(this_token.type)
		{
			case __left_bracket:call_list_expr();break;
			case __left_curve:call_function_expr();break;
			case __dot:call_hash_expr();break;
			default:parse.push(this_token);break;
		}
	}
	else if(this_token.type==__right_bracket)
	{
		get_token();
		switch(this_token.type)
		{
			case __left_bracket:call_list_expr();break;
			case __left_curve:call_function_expr();break;
			case __dot:call_hash_expr();break;
			default:parse.push(this_token);break;
		}
	}
	node.set_node_to_list_search();
	return node;
}
abstract_syntax_tree generator::call_function_expr()
{
	abstract_syntax_tree node;
	get_token();
	while(this_token.type!=__right_curve)
	{
		switch(this_token.type)
		{
			case __number:number_begin_expr();break;
			case __string:string_begin_expr();break;
			case __id:identifier_begin_expr();break;
			case __left_bracket:list_generate_expr();break;
			case __left_brace:hash_generate_expr();break;
			case __left_curve:in_curve_calc_expr();break;
			case __func:function_generate_expr();break;
			default:break;
		}
		get_token();
		if(this_token.type==__comma)
			get_token();
	}
	get_token();
	switch(this_token.type)
	{
		case __left_bracket:call_list_expr();break;
		case __left_curve:call_function_expr();break;
		case __dot:call_hash_expr();break;
		default:parse.push(this_token);break;
	}
	
	node.set_node_to_call_function();
	return node;
}
abstract_syntax_tree generator::call_hash_expr()
{
	get_token();
	return identifier_begin_expr();
}
abstract_syntax_tree generator::identifier_begin_expr()
{
	// __id has been checked
	abstract_syntax_tree node;
	
	node.set_node_to_id(this_token.content);
	
	get_token();
	int temp_type=this_token.type;
	switch(this_token.type)
	{
		case __left_bracket:node=call_list_expr();break;
		case __left_curve:node=call_function_expr();break;
		case __dot:node=call_hash_expr();break;
		case __add_operator:
		case __sub_operator:node.set_two_operator(temp_type,node,add_sub_operator_expr());break;
		case __mul_operator:
		case __div_operator:node.set_two_operator(temp_type,node,mul_div_operator_expr());break;
		case __link_operator:node.set_two_operator(temp_type,node,link_operator_expr());break;
		case __and_operator:
		case __or_operator:
		case __cmp_equal:
		case __cmp_not_equal:
		case __cmp_less:
		case __cmp_more:
		case __cmp_less_or_equal:
		case __cmp_more_or_equal:node.set_two_operator(temp_type,node,compare_operator_expr());break;
		default:parse.push(this_token);break;
	}
	get_token();
	temp_type=this_token.type;
	switch(this_token.type)
	{
		case __add_operator:
		case __sub_operator:node.set_two_operator(temp_type,node,add_sub_operator_expr());break;
		case __mul_operator:
		case __div_operator:node.set_two_operator(temp_type,node,mul_div_operator_expr());break;
		case __link_operator:node.set_two_operator(temp_type,node,link_operator_expr());break;
		case __and_operator:
		case __or_operator:
		case __cmp_equal:
		case __cmp_not_equal:
		case __cmp_less:
		case __cmp_more:
		case __cmp_less_or_equal:
		case __cmp_more_or_equal:node.set_two_operator(temp_type,node,compare_operator_expr());break;
		case __equal:
		case __add_equal:
		case __sub_equal:
		case __mul_equal:
		case __div_equal:
		case __link_equal:node=assignment_expr();break;
		default:parse.push(this_token);break;
	}
	return node;
}
void generator::gen_main_work()
{
	root.tree_set_clear();
	
	while(!parse.empty())
	{
		get_token();
		token t;
		switch(this_token.type)
		{
			case __var:root.add_statement(definition_expr());check_semi_at_end();break;
			case __id:root.add_statement(identifier_begin_expr());check_semi_at_end();break;
			case __number:root.add_statement(number_begin_expr());check_semi_at_end();break;
			case __string:root.add_statement(string_begin_expr());check_semi_at_end();break;
			case __left_curve:
				t=this_token;
				get_token();
				if(this_token.type==__var)
				{
					parse.push(t);
					root.add_statement(definition_expr());
				}
				else
				{
					parse.push(this_token);
					root.add_statement(in_curve_calc_expr());
				}
				check_semi_at_end();
				break;
			case __if:parse.push(this_token);root.add_statement(if_else_expr());break;
			case __add_operator:
			case __sub_operator:
			case __nor_operator:root.add_statement(one_operator_expr());break;
			case __while:
			case __for:
			case __foreach:
			case __forindex:parse.push(this_token);root.add_statement(loop_expr());break;
			case __semi:break;
			default:break;
		}
	}
	std::cout<<">>[Abstract-syntax-tree] complete generation."<<std::endl;
	return;
}

#endif