【導(dǎo)讀】實驗建立C-編譯器。只含有掃描程序和語法分析部分。④空格由空白、換行符和制表符組成?？崭裢ǔ１缓雎?，除了它必須分開ID、NUM關(guān)。⑤注釋用通常的C語言符號/*...*/圍起來。置上，且可以超過一行。重復(fù)此步驟，直到DONE為止，輸出token類型。時轉(zhuǎn)到ENDCOMMENT狀態(tài)，表明是注釋，如果其他的則是字符停滯于當前字符，并且輸出“/”。//定義的Token的類型(31種)，分別對應(yīng)于else、if、int、return、void、while、+、=、=、;、,、(、)、[、]、{、}、/*、*/、num、id、錯。voidScanner::scan()：設(shè)置輸出結(jié)果界面以及設(shè)置各種輸出狀態(tài)。cout<<"詞法分析成功了！

　　

【正文】 match(ID)。 if(==LMBRACKET) { TreeNode * q3 = newNode(Var_DeclK)。 pchild[3] = q3。 match(LMBRACKET)。 match(RMBRACKET)。 match(SEMI)。 } else if(==SEMI) { match(SEMI)。 } else { match(SEMI)。 } } else { syntaxError()。 } if(p!=NULL) { if(t==NULL) t = q = p。 else { qsibling = p。 q = p。 } } } return t。 } TreeNode * Parser :: statement_list(void) { TreeNode * t = statement()。 TreeNode * p = t。 while (IF== || LBBRACKET== || ID== || WHILE== || RETURN == || SEMI== || LPAREN== || NUM==) { TreeNode * q。 q = statement()。 if(q!=NULL) { if(t==NULL) { t = p = q。 } else { psibling = q。 p = q。 } } } return t。 } TreeNode * Parser :: statement(void) { TreeNode * t = NULL。 switch() { case IF: t = selection_stmt()。 break。 case WHILE: t = iteration_stmt()。 break。 case RETURN: t = return_stmt()。 break。 case LBBRACKET: t = pound_stmt()。 break。 case ID: case SEMI: case LPAREN: case NUM: t = expression_stmt()。 break。 default: syntaxError()。 currentToken = getToken()。 break。 } return t。 } TreeNode * Parser :: selection_stmt(void) { TreeNode * t = newNode(Selection_StmtK)。 match(IF)。 match(LPAREN)。 if(t!=NULL) { tchild[0] = expression()。 } match(RPAREN)。 tchild[1] = statement()。 if(==ELSE) { match(ELSE)。 if(t!=NULL) { tchild[2] = statement()。 } } return t。 } TreeNode * Parser :: expression_stmt(void) { TreeNode * t = NULL。 if(==SEMI) { match(SEMI)。 return t。 } else { t = expression()。 match(SEMI)。 } return t。 } TreeNode * Parser :: iteration_stmt(void) { TreeNode * t = newNode(Iteration_StmtK)。 match(WHILE)。 match(LPAREN)。 if(t!=NULL) { tchild[0] = expression()。 } match(RPAREN)。 if(t!=NULL) { tchild[1] = statement()。 } return t。 } TreeNode * Parser :: return_stmt(void) { TreeNode * t = newNode(Return_StmtK)。 match(RETURN)。 if (==SEMI) { match(SEMI)。 return t。 } else { if(t!=NULL) { tchild[0] = expression()。 } } match(SEMI)。 return t。 } TreeNode * Parser :: expression(void) { TreeNode * t = var()。 if(t==NULL)//不是以 ID 開頭，只能是 simple_expression情況 { t = simple_expression(t)。 } else//以 ID 開頭，可能是賦值語句，或 simple_expression 中的 var 和 call類型的情況 { TreeNode * p = NULL。 if(==ASSIGN)//賦值語句 { p = newNode(AssignK)。 p = ()。 match(ASSIGN)。 pchild[0] = t。 pchild[1] = expression()。 return p。 } else //simple_expression中的 var和 call 類型的情況 { t = simple_expression(t)。 } } return t。 } TreeNode * Parser :: simple_expression(TreeNode * k) { TreeNode * t = additive_expression(k)。 k = NULL。 if(EQ== || GT== || GEQ== || LT== || LEQ== || NEQ==) { TreeNode * q = newNode(OpK)。 q = 。 qchild[0] = t。 t = q。 match()。 tchild[1] = additive_expression(k)。 return t。 } return t。 } TreeNode * Parser :: additive_expression(TreeNode * k) { TreeNode * t = term(k)。 k = NULL。 while((==PLUS)||(==MINUS)) { TreeNode * q = newNode(OpK)。 q = 。 qchild[0] = t。 match()。 qchild[1] = term(k)。 t = q。 } return t。 } TreeNode * Parser :: term(TreeNode * k) { TreeNode * t = factor(k)。 k = NULL。 while((==TIMES)||(==OVER)) { TreeNode * q = newNode(OpK)。 q = 。 qchild[0] = t。 t = q。 match()。 qchild[1] = factor(k)。 } return t。 } TreeNode * Parser :: factor(TreeNode * k) { TreeNode * t = NULL。 if(k!=NULL)//k 為上面?zhèn)飨聛淼囊呀?jīng)解析出來的以 ID 開頭的 var,可能為 call 或 var { if(==LPAREN amp。amp。 knodekind!=Arry_ElemK) //call { t = call(k)。 } else { t = k。 } } else//沒有從上面?zhèn)飨聛淼?var { switch() { case LPAREN: match(LPAREN)。 t = expression()。 match(RPAREN)。 break。 case ID: k = var()。 if(LPAREN== amp。amp。 knodekind!=Arry_ElemK) { t = call(k)。 } break。 case NUM: t = newNode(ConstK)。 if((t!=NULL)amp。amp。(==NUM)) { t = atoi(())。 } match(NUM)。 break。 default: syntaxError()。 currentToken = getToken()。 break。 } } return t。 } TreeNode * Parser :: var(void) { TreeNode * t = NULL。 TreeNode * p = NULL。 TreeNode * q = NULL。 if(==ID) { p = newNode(IdK)。 p = ()。 match(ID)。 if(==LMBRACKET) { match(LMBRACKET)。 q = expression()。 match(RMBRACKET)。 t = newNode(Arry_ElemK)。 tchild[0] = p。 tchild[1] = q。 } else { t = p。 } } return t。 } TreeNode * Parser :: call(TreeNode * k) { TreeNode * t = newNode(CallK)。 if(k!=NULL) tchild[0] = k。 match(LPAREN)。 if(==RPAREN) { match(RPAREN)。 return t。 } else if(k!=NULL) { tchild[1] = args()。 match(RPAREN)。 } return t。 } TreeNode * Parser :: args(void) { TreeNode * t = newNode(ArgsK)。 TreeNode * s = NULL。 TreeNode * p = NULL。 if(!=RPAREN) { s = expression()。 p = s。 while(==COMMA) { TreeNode * q。 match(COMMA)。 q = expression()。 if(q!=NULL) { if(s==NULL) { s = p = q。 } else { psibling = q。 p = q。 } } }