From: Doug Rupp <rupp@adacore.com>
Date: Thu, 31 Jul 2014 12:54:32 +0000 (+0000)
Subject: misc.c (gnat_init_gcc_fp(): Set flag_errno_math to 0.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=20bebd4c5f9a6056020d4306aaa96422e6d44300;p=gcc.git

misc.c (gnat_init_gcc_fp(): Set flag_errno_math to 0.

2014-07-31  Doug Rupp  <rupp@adacore.com>

	* gcc-interface/misc.c (gnat_init_gcc_fp(): Set flag_errno_math to 0.

From-SVN: r213355
---

diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index 6b89f7f65cc..42c927fbb55 100644
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,7 @@
+2014-07-31  Doug Rupp  <rupp@adacore.com>
+
+	* gcc-interface/misc.c (gnat_init_gcc_fp(): Set flag_errno_math to 0.
+
 2014-07-31  Hristian Kirtchev  <kirtchev@adacore.com>
 
 	* sem_util.adb (Is_Effectively_Volatile): New routine.
diff --git a/gcc/ada/gcc-interface/misc.c b/gcc/ada/gcc-interface/misc.c
index fe44c6d5b3f..c2ab5f6d106 100644
--- a/gcc/ada/gcc-interface/misc.c
+++ b/gcc/ada/gcc-interface/misc.c
@@ -414,6 +414,11 @@ gnat_init_gcc_fp (void)
     flag_trapping_math = 1;
   else if (!global_options_set.x_flag_trapping_math)
     flag_trapping_math = 0;
+
+  /* We don't care in Ada about errno, and it causes __builtin_sqrt to
+     to call the libm function rather than do it inline.  */
+  if (!global_options_set.x_flag_errno_math)
+    flag_errno_math = 0;
 }
 
 /* Print language-specific items in declaration NODE.  */