| commit | 9f3880d1ecf46a2a1a5bd27a8d2bc4104a9bdd74 | |
| author | Tobias Burnus <burnus@net-b.de> | |
| Fri, 10 Apr 2015 12:03:35 +0000 (10 14:03 +0200) | ||
| committer | Mikael Morin <mikael@gcc.gnu.org> | |
| Fri, 10 Apr 2015 12:03:35 +0000 (10 12:03 +0000) | ||
| tree | 4b0b922eb75c016e5b0c6256c024a7e35a063e14 | treesnapshot (tar.gz zip) |
| parent | 44c57c2f9049c9fa53817b71110cf0cee00675b6 | commitdiff |
trans-stmt.c (gfc_trans_lock_unlock): Implement -fcoarray=lib version; reject not-yet-implemented variants.
2015-04-10 Tobias Burnus <burnus@net-b.de>
gcc/fortran/
* trans-stmt.c (gfc_trans_lock_unlock): Implement -fcoarray=lib
version; reject not-yet-implemented variants.
* trans-types.c (gfc_get_derived_type): For lock_type with
-fcoarray=lib, use a void pointer as type.
* trans.c (gfc_allocate_using_lib, gfc_allocate_allocatable):
Handle lock_type with -fcoarray=lib.
gcc/testsuite/
* gfortran.dg/coarray_lock_6.f90: New.
* gfortran.dg/coarray_lock_7.f90: New.
* gfortran.dg/coarray/lock_2.f90: New.
From-SVN: r221973
2015-04-10 Tobias Burnus <burnus@net-b.de>
gcc/fortran/
* trans-stmt.c (gfc_trans_lock_unlock): Implement -fcoarray=lib
version; reject not-yet-implemented variants.
* trans-types.c (gfc_get_derived_type): For lock_type with
-fcoarray=lib, use a void pointer as type.
* trans.c (gfc_allocate_using_lib, gfc_allocate_allocatable):
Handle lock_type with -fcoarray=lib.
gcc/testsuite/
* gfortran.dg/coarray_lock_6.f90: New.
* gfortran.dg/coarray_lock_7.f90: New.
* gfortran.dg/coarray/lock_2.f90: New.
From-SVN: r221973
| gcc/fortran/ChangeLog | diffblobblamehistory | |
| gcc/fortran/trans-stmt.c | diffblobblamehistory | |
| gcc/fortran/trans-types.c | diffblobblamehistory | |
| gcc/fortran/trans.c | diffblobblamehistory | |
| gcc/testsuite/ChangeLog | diffblobblamehistory | |
| gcc/testsuite/gfortran.dg/coarray/lock_2.f90 | [new file with mode: 0644] | blob |
| gcc/testsuite/gfortran.dg/coarray_lock_6.f90 | [new file with mode: 0644] | blob |
| gcc/testsuite/gfortran.dg/coarray_lock_7.f90 | [new file with mode: 0644] | blob |