OpenE2K/gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

* gcc-interface/trans.c (gigi): Fix initialization order.

Browse Source 
From-SVN: r231068
This commit is contained in:
Eric Botcazou 2015-11-30 12:06:30 +00:00 committed by Eric Botcazou
parent 4f852a1aff
commit c8a23c29f7
2 changed files with 14 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
gcc/ada/ChangeLog
View File

@ -1,3 +1,7 @@
2015-11-30 Eric Botcazou <ebotcazou@adacore.com>
* gcc-interface/trans.c (gigi): Fix initialization order.
2015-11-30 Eric Botcazou <ebotcazou@adacore.com>
* osint.adb: Add use type clause for CRTL.size_t.

19
gcc/ada/gcc-interface/trans.c
View File

@ -627,8 +627,16 @@ gigi (Node_Id gnat_root,
main_identifier_node = get_identifier ("main");
/* Install the builtins we might need, either internally or as
user available facilities for Intrinsic imports. */
/* If we are using the GCC exception mechanism, let GCC know. */
if (Back_End_Exceptions ())
gnat_init_gcc_eh ();
/* Initialize the GCC support for FP operations. */
gnat_init_gcc_fp ();
/* Install the builtins we might need, either internally or as user-available
facilities for Intrinsic imports. Note that this must be done after the
GCC exception mechanism is initialized. */
gnat_install_builtins ();
vec_safe_push (gnu_except_ptr_stack, NULL_TREE);
@ -641,13 +649,6 @@ gigi (Node_Id gnat_root,
targetm.asm_out.output_ident
(TREE_STRING_POINTER (gnat_to_gnu (Ident_String (Main_Unit))));
/* If we are using the GCC exception mechanism, let GCC know. */
if (Back_End_Exceptions ())
gnat_init_gcc_eh ();
/* Initialize the GCC support for FP operations. */
gnat_init_gcc_fp ();
/* Force -fno-strict-aliasing if the configuration pragma was seen. */
if (No_Strict_Aliasing_CP)
flag_strict_aliasing = 0;