From: Uros Bizjak Date: Thu, 14 Apr 2005 11:26:45 +0000 (+0200) Subject: convert.c (convert_to_integer): Convert (long int)trunc{,f,l}, and (long long int... X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=2ec76fdb2413bee3123b322e4f4259ba9f9c8310;p=gcc.git convert.c (convert_to_integer): Convert (long int)trunc{,f,l}, and (long long int)ceil{,f,l} into FIX_TRUNC_EXPR. * convert.c (convert_to_integer): Convert (long int)trunc{,f,l}, and (long long int)ceil{,f,l} into FIX_TRUNC_EXPR. testsuite: * gcc.dg/builtins-53.c: Also check (int)trunc* and (long long int)trunc*. From-SVN: r98131 --- diff --git a/gcc/ChangeLog b/gcc/ChangeLog index f96cfbd4506..cdbbf339e3d 100644 --- a/gcc/ChangeLog +++ b/gcc/ChangeLog @@ -1,3 +1,8 @@ +2005-04-14 Uros Bizjak + + * convert.c (convert_to_integer): Convert (long int)trunc{,f,l}, + and (long long int)ceil{,f,l} into FIX_TRUNC_EXPR. + 2005-04-14 Ulrich Weigand PR target/20927 diff --git a/gcc/convert.c b/gcc/convert.c index 9ae300d21f2..4e0fc84050b 100644 --- a/gcc/convert.c +++ b/gcc/convert.c @@ -381,6 +381,13 @@ convert_to_integer (tree type, tree expr) else fn = mathfn_built_in (s_intype, BUILT_IN_LRINT); break; + + case BUILT_IN_TRUNC: case BUILT_IN_TRUNCF: case BUILT_IN_TRUNCL: + { + tree arglist = TREE_OPERAND (s_expr, 1); + return convert_to_integer (type, TREE_VALUE (arglist)); + } + default: break; } diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 70a01265b71..d7731060aa8 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2005-04-14 Uros Bizjak + + * gcc.dg/builtins-53.c: Also check (int)trunc* and + (long long int)trunc*. + 2005-04-14 Ulrich Weigand PR target/20927 diff --git a/gcc/testsuite/gcc.dg/builtins-53.c b/gcc/testsuite/gcc.dg/builtins-53.c index 6bf481b1c37..0a080704fb3 100644 --- a/gcc/testsuite/gcc.dg/builtins-53.c +++ b/gcc/testsuite/gcc.dg/builtins-53.c @@ -13,12 +13,15 @@ extern double floor(double); extern double ceil(double); +extern double trunc(double); extern float floorf(float); extern float ceilf(float); +extern float truncf(float); extern long double floorl(long double); extern long double ceill(long double); +extern long double truncl(long double); long int test1(double x) @@ -41,6 +44,16 @@ long long int test4(double x) return ceil(x); } +long int test5(double x) +{ + return trunc(x); +} + +long long int test6(double x) +{ + return trunc(x); +} + long int test1f(float x) { return floorf(x); @@ -61,6 +74,16 @@ long long int test4f(float x) return ceilf(x); } +long int test5f(float x) +{ + return truncf(x); +} + +long long int test6f(float x) +{ + return truncf(x); +} + long int test1l(long double x) { return floorl(x); @@ -80,3 +103,13 @@ long long int test4l(long double x) { return ceill(x); } + +long int test5l(long double x) +{ + return truncl(x); +} + +long long int test6l(long double x) +{ + return truncl(x); +}