From ed9c846c2079c536b0313dfaeef15c22e3e66a2b Mon Sep 17 00:00:00 2001 From: Richard Henderson Date: Sun, 19 Dec 2004 11:59:23 -0800 Subject: [PATCH] * trans.c (gigi): Update gimplify_body call. From-SVN: r92385 --- gcc/ada/ChangeLog | 4 ++++ gcc/ada/trans.c | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 44e0cb7209ff..1676f35bb87a 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,7 @@ +2004-12-19 Richard Henderson + + * trans.c (gigi): Update gimplify_body call. + 2004-12-09 Nathan Sidwell * decl.c (gnat_substitute_in_type): Remove SET_TYPE case. diff --git a/gcc/ada/trans.c b/gcc/ada/trans.c index 2acf8323849e..e3d5f47e023f 100644 --- a/gcc/ada/trans.c +++ b/gcc/ada/trans.c @@ -253,7 +253,7 @@ gigi (Node_Id gnat_root, int max_gnat_node, int number_name, /* Set the current function to be the elaboration procedure and gimplify what we have. */ current_function_decl = info->elab_proc; - gimplify_body (&gnu_body, info->elab_proc); + gimplify_body (&gnu_body, info->elab_proc, false); /* We should have a BIND_EXPR, but it may or may not have any statements in it. If it doesn't have any, we have nothing to do. */ -- 2.47.2