expr.c (expand_builtin): Use value_mode for the return mode.

        * expr.c (expand_builtin) [case BUILT_IN_CONSTANT_P]: Use
        value_mode for the return mode.

From-SVN: r24525

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index b7b8c7ad8327b1e0757a636c6b50530595d96c91..3c8a8b472032a7fefa4a006c0aab5a6b90aa9d48 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,8 @@
+Wed Jan  6 07:51:05 1999  Richard Henderson  <rth@cygnus.com>
+
+       * expr.c (expand_builtin) [case BUILT_IN_CONSTANT_P]: Use
+       value_mode for the return mode.
+
 Wed Jan  6 17:55:19 1999  Robert Lipe  <robertlipe@usa.net>
 
        * configure.in: New flag --with-dwarf2.   If set, enables DWARF-2

diff --git a/gcc/expr.c b/gcc/expr.c
index 496764244ece9d60aa9e8947e65f90e51dd808bf..48f726a182ab4e76798e7d37f3aa33013c0d8499 100644 (file)
--- a/gcc/expr.c
+++ b/gcc/expr.c
@@ -9031,7 +9031,7 @@ expand_builtin (exp, target, subtarget, mode, ignore)
          tmp = expand_expr (arg, NULL_RTX, VOIDmode, 0);
          tmp = gen_rtx_CONSTANT_P_RTX (ptr_mode, tmp);
          tmp = gen_rtx_CONST (ptr_mode, tmp);
-         tmp = convert_to_mode (mode, tmp, 0);
+         tmp = convert_to_mode (value_mode, tmp, 0);
          return tmp;
        }