actions.c (chill_convert_for_assignment): Make a copy of the result node before modifying it.

Thu Sep 10 17:52:36 1998  Dave Brolley  <brolley@cygnus.com>
	* actions.c (chill_convert_for_assignment): Make a copy of the result
	node before modifying it.

From-SVN: r22382

gcc/ch/ChangeLog

+Thu Sep 10 17:52:36 1998  Dave Brolley  <brolley@cygnus.com>
+
+	* actions.c (chill_convert_for_assignment): Make a copy of the result
+	node before modifying it.
+
 Sat Sep  5 16:55:37 1998  John Carr  <jfc@mit.edu>
 
 	* Make-lang.in: Comment ^L characters.  Sun make doesn't like them.

gcc/ch/actions.c

@@ -589,6 +589,7 @@ chill_convert_for_assignment (type, expr, place)
 		}
 	    }
 	}
+      result = copy_node (result);
       TREE_OPERAND (result, 1) = nreverse (new_list);
       TREE_TYPE (result) = build_bitstring_type (TYPE_SIZE (type));
     }