diff options
author | Jakub Jelinek <jakub@redhat.com> | 2019-03-05 23:41:39 +0100 |
---|---|---|
committer | Jakub Jelinek <jakub@gcc.gnu.org> | 2019-03-05 23:41:39 +0100 |
commit | 934e992600497edec7ca89952d8d6579844a5164 (patch) | |
tree | d887cc27793a4485474081309fe54da1ad1bf9fd /libgfortran | |
parent | b211cd1b4639a0ee3be5f643bde10b1c1683bb58 (diff) | |
download | gcc-934e992600497edec7ca89952d8d6579844a5164.zip gcc-934e992600497edec7ca89952d8d6579844a5164.tar.gz gcc-934e992600497edec7ca89952d8d6579844a5164.tar.bz2 |
re PR libfortran/89593 (warning "passing argument 3 of ‘_gfortran_caf_{get,send}_by_ref’ from incompatible pointer type" when building libgfortran)
PR libgfortran/89593
* caf/single.c (_gfortran_caf_sendget_by_ref): Cast &temp to
gfc_descriptor_t * to avoid warning.
From-SVN: r269405
Diffstat (limited to 'libgfortran')
-rw-r--r-- | libgfortran/ChangeLog | 6 | ||||
-rw-r--r-- | libgfortran/caf/single.c | 6 |
2 files changed, 10 insertions, 2 deletions
diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog index 25db8c6..6ce8b5f 100644 --- a/libgfortran/ChangeLog +++ b/libgfortran/ChangeLog @@ -1,3 +1,9 @@ +2019-03-05 Jakub Jelinek <jakub@redhat.com> + + PR libgfortran/89593 + * caf/single.c (_gfortran_caf_sendget_by_ref): Cast &temp to + gfc_descriptor_t * to avoid warning. + 2019-02-26 Uroš Bizjak <ubizjak@gmail.com> * io/transfer.c (transfer_array_inner): Do not diff --git a/libgfortran/caf/single.c b/libgfortran/caf/single.c index 1190f1ab..2e634bc 100644 --- a/libgfortran/caf/single.c +++ b/libgfortran/caf/single.c @@ -2810,14 +2810,16 @@ _gfortran_caf_sendget_by_ref (caf_token_t dst_token, int dst_image_index, GFC_DESCRIPTOR_RANK (&temp) = -1; GFC_DESCRIPTOR_TYPE (&temp) = dst_type; - _gfortran_caf_get_by_ref (src_token, src_image_index, &temp, src_refs, + _gfortran_caf_get_by_ref (src_token, src_image_index, + (gfc_descriptor_t *) &temp, src_refs, dst_kind, src_kind, may_require_tmp, true, src_stat, src_type); if (src_stat && *src_stat != 0) return; - _gfortran_caf_send_by_ref (dst_token, dst_image_index, &temp, dst_refs, + _gfortran_caf_send_by_ref (dst_token, dst_image_index, + (gfc_descriptor_t *) &temp, dst_refs, dst_kind, dst_kind, may_require_tmp, true, dst_stat, dst_type); if (GFC_DESCRIPTOR_DATA (&temp)) |