diff options
| author | rguenth <rguenth@138bc75d-0d04-0410-961f-82ee72b054a4> | 2005-12-02 17:05:20 +0000 |
|---|---|---|
| committer | rguenth <rguenth@138bc75d-0d04-0410-961f-82ee72b054a4> | 2005-12-02 17:05:20 +0000 |
| commit | c76187f7adc232ed244feed4b9c39c1bddee6a1d (patch) | |
| tree | 49d5d55c9373a99f3de740a70d90b230e3ff6d64 | |
| parent | 4d996ee830bc8839de37941a4bcaba7720551b97 (diff) | |
| download | ppe42-gcc-c76187f7adc232ed244feed4b9c39c1bddee6a1d.tar.gz ppe42-gcc-c76187f7adc232ed244feed4b9c39c1bddee6a1d.zip | |
2005-12-02 Richard Guenther <rguenther@suse.de>
* trans.c (gnat_gimplify_expr): Use buildN instead of build.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@107905 138bc75d-0d04-0410-961f-82ee72b054a4
| -rw-r--r-- | gcc/ada/ChangeLog | 4 | ||||
| -rw-r--r-- | gcc/ada/trans.c | 2 |
2 files changed, 5 insertions, 1 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 74ebace0d31..e3c9fdb259b 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,7 @@ +2005-12-02 Richard Guenther <rguenther@suse.de> + + * trans.c (gnat_gimplify_expr): Use buildN instead of build. + 2005-12-01 Roger Sayle <roger@eyesopen.com> * utils.c (max_size): Only test for TREE_OVERFLOW on INTEGER_CST diff --git a/gcc/ada/trans.c b/gcc/ada/trans.c index c7126720003..3dc62a2fd18 100644 --- a/gcc/ada/trans.c +++ b/gcc/ada/trans.c @@ -4632,7 +4632,7 @@ gnat_gimplify_expr (tree *expr_p, tree *pre_p, tree *post_p ATTRIBUTE_UNUSED) && TREE_CODE_CLASS (TREE_CODE (op)) != tcc_constant) { tree new_var = create_tmp_var (TREE_TYPE (op), "A"); - tree mod = build (MODIFY_EXPR, TREE_TYPE (op), new_var, op); + tree mod = build2 (MODIFY_EXPR, TREE_TYPE (op), new_var, op); TREE_ADDRESSABLE (new_var) = 1; |
