aboutsummaryrefslogtreecommitdiff
path: root/libgfortran
diff options
context:
space:
mode:
authorJakub Jelinek <jakub@redhat.com>2019-03-05 22:41:39 +0000
committerJakub Jelinek <jakub@redhat.com>2019-03-05 22:41:39 +0000
commit8977ce340c06f4b998a25e7c5ddfa686b71ea2b0 (patch)
treed887cc27793a4485474081309fe54da1ad1bf9fd /libgfortran
parent5ea5eabf2beb12c40b492d83b42c758122133f6e (diff)
PR libgfortran/89593
* caf/single.c (_gfortran_caf_sendget_by_ref): Cast &temp to gfc_descriptor_t * to avoid warning. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@269405 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libgfortran')
-rw-r--r--libgfortran/ChangeLog6
-rw-r--r--libgfortran/caf/single.c6
2 files changed, 10 insertions, 2 deletions
diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog
index 25db8c65b7d..6ce8b5f9fcf 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 1190f1abae3..2e634bc8d55 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))