gcc/fortran/ 2014-07-12 Tobias Burnus <burnus@net-b.de> * check.c (gfc_check_atomic): Update for STAT=. (gfc_check_atomic_def, gfc_check_atomic_ref): Update call. (gfc_check_atomic_op, gfc_check_atomic_cas, gfc_check_atomic_fetch_op): New. * gfortran.h (gfc_isym_id): GFC_ISYM_ATOMIC_CAS, * GFC_ISYM_ATOMIC_ADD, GFC_ISYM_ATOMIC_AND, GFC_ISYM_ATOMIC_OR, GFC_ISYM_ATOMIC_XOR, GFC_ISYM_ATOMIC_FETCH_ADD, GFC_ISYM_ATOMIC_FETCH_AND, GFC_ISYM_ATOMIC_FETCH_OR and GFC_ISYM_ATOMIC_FETCH_XOR. * intrinsic.c (add_subroutines): Handle them. * intrinsic.texi: Add documentation for them. (ATOMIC_REF, ATOMIC_DEFINE): Add STAT=. (ISO_FORTRAN_ENV): Add STAT_FAILED_IMAGE. * intrinsic.h (gfc_check_atomic_op, gfc_check_atomic_cas, gfc_check_atomic_fetch_op): New prototypes. * libgfortran.h (libgfortran_stat_codes): Add * GFC_STAT_FAILED_IMAGE. * iso-fortran-env.def: Add it. * trans-intrinsic.c (conv_intrinsic_atomic_op): Renamed from conv_intrinsic_atomic_ref; handle more atomics. (conv_intrinsic_atomic_def): Handle STAT=. (conv_intrinsic_atomic_cas): New. (gfc_conv_intrinsic_subroutine): Handle new atomics. gcc/testsuite/ 2014-07-12 Tobias Burnus <burnus@net-b.de> * gfortran.dg/coarray_atomic_1.f90: Update dg-error. * gfortran.dg/coarray_atomic_2.f90: New. * gfortran.dg/coarray_atomic_3.f90: New. * gfortran.dg/coarray_atomic_4.f90: New. * gfortran.dg/coarray/atomic_2.f90: New. From-SVN: r212483
Name |
Last commit
|
Last update |
---|---|---|
.. | ||
alloc_comp_1.f90 | Loading commit data... | |
alloc_comp_2.f90 | Loading commit data... | |
alloc_comp_3.f90 | Loading commit data... | |
allocate_errgmsg.f90 | Loading commit data... | |
atomic_1.f90 | Loading commit data... | |
atomic_2.f90 | Loading commit data... | |
caf.exp | Loading commit data... | |
codimension.f90 | Loading commit data... | |
coindexed_1.f90 | Loading commit data... | |
coindexed_3.f90 | Loading commit data... | |
collectives_1.f90 | Loading commit data... | |
collectives_2.f90 | Loading commit data... | |
dummy_1.f90 | Loading commit data... | |
get_array.f90 | Loading commit data... | |
image_index_1.f90 | Loading commit data... | |
image_index_2.f90 | Loading commit data... | |
image_index_3.f90 | Loading commit data... | |
lib_realloc_1.f90 | Loading commit data... | |
lock_1.f90 | Loading commit data... | |
move_alloc_1.f90 | Loading commit data... | |
poly_run_1.f90 | Loading commit data... | |
poly_run_2.f90 | Loading commit data... | |
poly_run_3.f90 | Loading commit data... | |
registering_1.f90 | Loading commit data... | |
scalar_alloc_1.f90 | Loading commit data... | |
scalar_alloc_2.f90 | Loading commit data... | |
send_array.f90 | Loading commit data... | |
sendget_array.f90 | Loading commit data... | |
subobject_1.f90 | Loading commit data... | |
sync_1.f90 | Loading commit data... | |
sync_3.f90 | Loading commit data... | |
this_image_1.f90 | Loading commit data... | |
this_image_2.f90 | Loading commit data... |