expr.c (expand_expr, [...]): If at top level, don't call force_const_mem.

	* expr.c (expand_expr, case ADDDR_EXPR): If at top level, don't call
	force_const_mem.

From-SVN: r46735

gcc/ChangeLog

 Sat Nov  3 10:37:56 2001  Richard Kenner  <kenner@vlsi1.ultra.nyu.edu>
 
+	* expr.c (expand_expr, case ADDDR_EXPR): If at top level, don't call
+	force_const_mem.
+
 	* reload.c (combine_reloads): Don't combine an output reload if there
 	are other reloads around for part of the output.
 

gcc/expr.c

@@ -8671,6 +8671,14 @@ expand_expr (exp, target, tmode, modifier)
 	 return a zero.  */
       else if (TREE_CODE (TREE_OPERAND (exp, 0)) == ERROR_MARK)
 	return const0_rtx;
+      /* If we are taking the address of a constant and are at the
+	 top level, we have to use output_constant_def since we can't
+	 call force_const_mem at top level.  */
+      else if (cfun == 0
+	       && (TREE_CODE (TREE_OPERAND (exp, 0)) == CONSTRUCTOR
+		   || (TREE_CODE_CLASS (TREE_CODE (TREE_OPERAND (exp, 0)))
+		       == 'c')))
+	op0 = XEXP (output_constant_def (TREE_OPERAND (exp, 0), 0), 0);
       else
 	{
 	  /* We make sure to pass const0_rtx down if we came in with