diff options
| author | Hans-Peter Nilsson <hp@axis.com> | 2024-12-24 00:07:54 +0100 |
|---|---|---|
| committer | Hans-Peter Nilsson <hp@bitrange.com> | 2024-12-24 01:13:02 +0100 |
| commit | a5b1f3e14ae6354bd7944dd5dd9c74880c7546db (patch) | |
| tree | 934fdbc7dfc0ddba5a9c5ef4ff47851d90f5c0b9 | |
| parent | f25250e0d5938a81f9f1b37ca873381dcfa26211 (diff) | |
| download | gcc-a5b1f3e14ae6354bd7944dd5dd9c74880c7546db.zip gcc-a5b1f3e14ae6354bd7944dd5dd9c74880c7546db.tar.gz gcc-a5b1f3e14ae6354bd7944dd5dd9c74880c7546db.tar.bz2 | |
libgfortran: Fix build for targets with int32_t=long int
Without this, after r15-6415-g586477d67bf2e3, you'll see,
for targets where int32_t is a typedef of long int (beware
of artificially broken lines):
/x/gcc/libgfortran/caf/single.c: In function '_gfortran_caf_get_by_ct':
/x/gcc/libgfortran/caf/single.c:2943:56: error: passing argument 2 of '\
(accessor_hash_table + (sizetype)((unsigned int)getter_index * 12))->ac\
cessor' from incompatible pointer type [-Wincompatible-pointer-types]
2943 | accessor_hash_table[getter_index].accessor (dst_ptr, &free_bu\
ffer, src_ptr,
| ^~~~~~~~\
~~~~
| |
| int *
/x/gcc/libgfortran/caf/single.c:2943:56: note: expected 'int32_t *' {ak\
a 'long int *'} but argument is of type 'int *'
libgfortran:
* caf/single.c (_gfortran_caf_get_by_ct): Correct type of free_buffer
to int32_t.
| -rw-r--r-- | libgfortran/caf/single.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libgfortran/caf/single.c b/libgfortran/caf/single.c index f5414ff..23ad44e 100644 --- a/libgfortran/caf/single.c +++ b/libgfortran/caf/single.c @@ -2927,7 +2927,7 @@ _gfortran_caf_get_by_ct ( { caf_single_token_t single_token = TOKEN (token); void *src_ptr = opt_src_desc ? (void *) opt_src_desc : single_token->memptr; - int free_buffer; + int32_t free_buffer; void *dst_ptr = opt_dst_desc ? (void *)opt_dst_desc : dst_data; void *old_dst_data_ptr = NULL; |