From 20bebd4c5f9a6056020d4306aaa96422e6d44300 Mon Sep 17 00:00:00 2001 From: Doug Rupp Date: Thu, 31 Jul 2014 12:54:32 +0000 Subject: [PATCH] misc.c (gnat_init_gcc_fp(): Set flag_errno_math to 0. 2014-07-31 Doug Rupp * gcc-interface/misc.c (gnat_init_gcc_fp(): Set flag_errno_math to 0. From-SVN: r213355 --- gcc/ada/ChangeLog | 4 ++++ gcc/ada/gcc-interface/misc.c | 5 +++++ 2 files changed, 9 insertions(+) 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 + + * gcc-interface/misc.c (gnat_init_gcc_fp(): Set flag_errno_math to 0. + 2014-07-31 Hristian Kirtchev * 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. */ -- 2.30.2