[Bug fortran/28390] Broken !$omp parallel do lastprivate(iterationvar)

[jakub at gcc dot gnu dot org]

------- Comment #1 from jakub at gcc dot gnu dot org  2006-07-16 20:19 -------
Subject: Bug 28390

Author: jakub
Date: Sun Jul 16 20:19:27 2006
New Revision: 115504

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=115504
Log:
        PR fortran/28390
        * trans-openmp.c (gfc_trans_omp_do): Look for LASTPRIVATE in
        code->exp.omp_clauses rather than in the 3rd function argument.

        * testsuite/libgomp.fortran/pr28390.f: New test.

Added:
    trunk/libgomp/testsuite/libgomp.fortran/pr28390.f
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/trans-openmp.c
    trunk/libgomp/ChangeLog


-- 


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