I'll update the commit log entry for r3450, the fix was for bug 705 not 703.
Doug > -----Original Message----- > From: s...@open64.net [mailto:s...@open64.net] > Sent: Monday, January 10, 2011 12:27 PM > To: open64-devel@lists.sourceforge.net > Subject: [Open64-devel] r3450 - trunk/osprey/wgen > > Author: dgilmore > Date: 2011-01-10 15:27:23 -0500 (Mon, 10 Jan 2011) > New Revision: 3450 > > Modified: > trunk/osprey/wgen/wgen_stmt.cxx > Log: > Fixed bug 703 (compile time problem in wgen). > > Reviewed and approved by Jian-Xin. > > > Modified: trunk/osprey/wgen/wgen_stmt.cxx > =================================================================== > --- trunk/osprey/wgen/wgen_stmt.cxx 2011-01-07 18:14:58 UTC (rev 3449) > +++ trunk/osprey/wgen/wgen_stmt.cxx 2011-01-10 20:27:23 UTC (rev 3450) > @@ -2557,6 +2557,7 @@ > #ifdef KEY > case GS_STATEMENT_LIST: { > gs_t stmt_list = gs_statement_list_elts(stmt); > + gs_t list; > BOOL new_scope = FALSE; > // bug 11869: This example shows there may be a label statement > // without an explicit scope. In such a scenario, a jump to such > @@ -2570,14 +2571,10 @@ > Push_Scope(stmt); > new_scope = TRUE; > } > -#ifdef FE_GNU_4_2_0 > - for (int i=0; i < gs_length(stmt_list); i++) > - Mark_Scopes_And_Labels(gs_index(stmt_list, i)); > -#else > - gs_t list; > + > for (list = stmt_list; gs_code(list)!=EMPTY; list = > gs_operand(list,1)) > Mark_Scopes_And_Labels(gs_operand(list,0)); > -#endif > + > if (new_scope) // End scope > --scope_i; > } > @@ -4293,14 +4290,9 @@ > > case GS_STATEMENT_LIST: { > gs_t stmt_list = gs_statement_list_elts(stmt); > -#ifdef FE_GNU_4_2_0 > - for (int i=0; i < gs_length(stmt_list); i++) > - WGEN_Expand_Stmt(gs_index(stmt_list, i), target_wn); > -#else > gs_t list; > for (list = stmt_list; gs_code(list)!=EMPTY; list = > gs_operand(list,1)) > WGEN_Expand_Stmt(gs_operand(list,0), target_wn); > -#endif > } > break; > > > > ----------------------------------------------------------------------- > ------- > Gaining the trust of online customers is vital for the success of any > company > that requires sensitive data to be transmitted over the Web. Learn > how to > best implement a security strategy that keeps consumers' information > secure > and instills the confidence they need to proceed with transactions. > http://p.sf.net/sfu/oracle-sfdevnl > _______________________________________________ > Open64-devel mailing list > Open64-devel@lists.sourceforge.net > https://lists.sourceforge.net/lists/listinfo/open64-devel ------------------------------------------------------------------------------ Gaining the trust of online customers is vital for the success of any company that requires sensitive data to be transmitted over the Web. Learn how to best implement a security strategy that keeps consumers' information secure and instills the confidence they need to proceed with transactions. http://p.sf.net/sfu/oracle-sfdevnl _______________________________________________ Open64-devel mailing list Open64-devel@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/open64-devel
