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

gcc/ChangeLog

+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

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;
 	}