misc.c (gnat_expand_expr, [...]): Remove call to set_mem_attributes since not…

misc.c (gnat_expand_expr, [...]): Remove call to set_mem_attributes since not needed and wrong if RESULT if a REG...

	* misc.c (gnat_expand_expr, case NULL_EXPR): Remove call to
	set_mem_attributes since not needed and wrong if RESULT if a REG;
	fixes ACATS failures.

From-SVN: r46659

gcc/ada/ChangeLog

+2001-10-30  Richard Kenner <kenner@gnat.com>
+
+	* misc.c (gnat_expand_expr, case NULL_EXPR): Remove call to 
+	set_mem_attributes since not needed and wrong if RESULT if a REG; 
+	fixes ACATS failures.
+
 2001-10-30  Geert Bosch <bosch@gnat.com>
 
 	* 86numaux.adb, a-tigeau.ads, a-wtgeau.ads, fname-sf.ads, g-traceb.ads,

gcc/ada/misc.c

@@ -634,7 +634,6 @@ gnat_expand_expr (exp, target, tmode, modifier)
       else
 	result = assign_temp (type, 0, TREE_ADDRESSABLE (exp), 1);
 
-      set_mem_attributes (result, exp, 1);
       return result;
 
     case ALLOCATE_EXPR: