------- Comment #1 from pault at gcc dot gnu dot org  2006-06-21 20:37 -------
Here's the patch: regtests on FC5/Athlon1700

Paul

Index: gcc/fortran/match.c
===================================================================
*** gcc/fortran/match.c (revision 114823)
--- gcc/fortran/match.c (working copy)
*************** gfc_match_forall (gfc_statement * st)
*** 3580,3588 ****
    *c = new_st;
    c->loc = gfc_current_locus;

-   if (gfc_match_eos () != MATCH_YES)
-     goto syntax;
- 
    gfc_clear_new_st ();
    new_st.op = EXEC_FORALL;
    new_st.expr = mask;
--- 3580,3585 ----


-- 

pault at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
         AssignedTo|unassigned at gcc dot gnu   |pault at gcc dot gnu dot org
                   |dot org                     |
             Status|UNCONFIRMED                 |ASSIGNED
     Ever Confirmed|0                           |1
   Last reconfirmed|0000-00-00 00:00:00         |2006-06-21 20:37:15
               date|                            |


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=28119

Reply via email to