diff options
| author | Francois-Xavier Coudert <fxcoudert@gcc.gnu.org> | 2007-08-10 13:20:46 +0000 |
|---|---|---|
| committer | François-Xavier Coudert <fxcoudert@gcc.gnu.org> | 2007-08-10 13:20:46 +0000 |
| commit | 8a09ef91fa2a67d82dd353c0bd8250d0d96c8fd0 (patch) | |
| tree | 6fe2b2a09d6588d6e70e33af11acf0040848bd81 /libgfortran/intrinsics | |
| parent | f419b6722272a11df4488202e1976ba978b5304c (diff) | |
| download | gcc-8a09ef91fa2a67d82dd353c0bd8250d0d96c8fd0.zip gcc-8a09ef91fa2a67d82dd353c0bd8250d0d96c8fd0.tar.gz gcc-8a09ef91fa2a67d82dd353c0bd8250d0d96c8fd0.tar.bz2 | |
re PR fortran/32933 (ICE in simplify_subreg with -fdefault-integer-8)
PR fortran/32933
* trans-decl.c (gfc_build_builtin_function_decls): Change
prototype for associated.
* trans-intrinsic.c (gfc_conv_intrinsic_minmax): Convert the
result of __builtin_isnan into a boolean.
(gfc_conv_intrinsic_strcmp): Cleanup.
(gfc_conv_associated): Convert the result of the associated
function into a boolean.
* intrinsics/associated.c: Change return type of associated into
a C int.
From-SVN: r127334
Diffstat (limited to 'libgfortran/intrinsics')
| -rw-r--r-- | libgfortran/intrinsics/associated.c | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/libgfortran/intrinsics/associated.c b/libgfortran/intrinsics/associated.c index d5ef556..0d32fd7 100644 --- a/libgfortran/intrinsics/associated.c +++ b/libgfortran/intrinsics/associated.c @@ -30,11 +30,10 @@ Boston, MA 02110-1301, USA. */ #include "libgfortran.h" -extern GFC_LOGICAL_4 associated (const gfc_array_void *, - const gfc_array_void *); +extern int associated (const gfc_array_void *, const gfc_array_void *); export_proto(associated); -GFC_LOGICAL_4 +int associated (const gfc_array_void *pointer, const gfc_array_void *target) { int n, rank; |