diff options
| author | Richard Guenther <rguenther@suse.de> | 2008-09-12 09:01:35 +0000 |
|---|---|---|
| committer | Richard Biener <rguenth@gcc.gnu.org> | 2008-09-12 09:01:35 +0000 |
| commit | 2944258965f5bb918cccbab259fdac072abfd8a7 (patch) | |
| tree | cf4680fb4314b13842bb5bb8f9cb66e0d3049525 /gcc/fortran/trans-intrinsic.c | |
| parent | 004a6ce8e739af31a8267c40eb15560610dad28e (diff) | |
| download | gcc-2944258965f5bb918cccbab259fdac072abfd8a7.zip gcc-2944258965f5bb918cccbab259fdac072abfd8a7.tar.gz gcc-2944258965f5bb918cccbab259fdac072abfd8a7.tar.bz2 | |
tree-vrp.c (simplify_truth_ops_using_ranges): Fix types.
2008-09-12 Richard Guenther <rguenther@suse.de>
* tree-vrp.c (simplify_truth_ops_using_ranges): Fix types.
fortran/
* trans-intrinsic.c (gfc_conv_intrinsic_transfer): Use
build_fold_addr_expr to properly mark the argument
addressable.
From-SVN: r140313
Diffstat (limited to 'gcc/fortran/trans-intrinsic.c')
| -rw-r--r-- | gcc/fortran/trans-intrinsic.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/trans-intrinsic.c b/gcc/fortran/trans-intrinsic.c index aa5ee45..f5f9922 100644 --- a/gcc/fortran/trans-intrinsic.c +++ b/gcc/fortran/trans-intrinsic.c @@ -3718,7 +3718,7 @@ gfc_conv_intrinsic_transfer (gfc_se * se, gfc_expr * expr) moldsize = size_in_bytes (type); /* Use memcpy to do the transfer. */ - tmp = fold_build1 (ADDR_EXPR, build_pointer_type (type), tmpdecl); + tmp = build_fold_addr_expr (tmpdecl); tmp = build_call_expr (built_in_decls[BUILT_IN_MEMCPY], 3, fold_convert (pvoid_type_node, tmp), fold_convert (pvoid_type_node, ptr), |