* trans.c (gigi): Update gimplify_body call.

From-SVN: r92385

* trans.c (gigi): Update gimplify_body call.
From-SVN: r92385
ed9c846c · Richard Henderson · Richard Henderson · 18330d28 · ed9c846c · ed9c846c
Commit ed9c846c authored Dec 19, 2004 by Richard Henderson Committed by Richard Henderson Dec 19, 2004
Hide whitespace changes
Inline Side-by-side

Showing with 5 additions and 1 deletions

gcc/ada/ChangeLog
+4 -0

gcc/ada/trans.c
+1 -1

No files found.
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
+2004-12-19  Richard Henderson  <rth@redhat.com>
+
+	* trans.c (gigi): Update gimplify_body call.
+
 2004-12-09  Nathan Sidwell  <nathan@codesourcery.com>

 	* decl.c (gnat_substitute_in_type): Remove SET_TYPE case.

--- 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.  */