From f542c405c0bb1d6eda47ba05832fbd3c10e7e27e Mon Sep 17 00:00:00 2001 From: Eric Botcazou Date: Wed, 13 Jul 2011 21:13:49 +0000 Subject: utils.c (build_vms_descriptor32): Skip the 32-bit range comparison if Pmode is SImode. * gcc-interface/utils.c (build_vms_descriptor32): Skip the 32-bit range comparison if Pmode is SImode. From-SVN: r176251 --- gcc/ada/gcc-interface/utils.c | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'gcc/ada/gcc-interface') diff --git a/gcc/ada/gcc-interface/utils.c b/gcc/ada/gcc-interface/utils.c index 9b6e721..c607865 100644 --- a/gcc/ada/gcc-interface/utils.c +++ b/gcc/ada/gcc-interface/utils.c @@ -2556,8 +2556,10 @@ build_vms_descriptor32 (tree type, Mechanism_Type mech, Entity_Id gnat_entity) tem = build_unary_op (ADDR_EXPR, pointer64_type, build0 (PLACEHOLDER_EXPR, type)); tem = build3 (COND_EXPR, pointer32_type, - build_binary_op (GE_EXPR, boolean_type_node, tem, - build_int_cstu (pointer64_type, 0x80000000)), + Pmode != SImode + ? build_binary_op (GE_EXPR, boolean_type_node, tem, + build_int_cstu (pointer64_type, 0x80000000)) + : boolean_false_node, build0 (PLACEHOLDER_EXPR, void_type_node), convert (pointer32_type, tem)); -- cgit v1.1