diff options
| author | gingold | 2006-08-12 14:03:22 +0000 |
|---|---|---|
| committer | gingold | 2006-08-12 14:03:22 +0000 |
| commit | 34c8fdb9e08041c7bd3ee344cbd73a9a46ecc4bd (patch) | |
| tree | fa29b174d2a31ba011eedb562d4d21e2a411a8ea /translate/grt/config/win32.c | |
| parent | 63925c8de8d3171e6b258796e4d167524691490a (diff) | |
| download | ghdl-34c8fdb9e08041c7bd3ee344cbd73a9a46ecc4bd.tar.gz ghdl-34c8fdb9e08041c7bd3ee344cbd73a9a46ecc4bd.tar.bz2 ghdl-34c8fdb9e08041c7bd3ee344cbd73a9a46ecc4bd.zip | |
ghdl 0.25 released
Diffstat (limited to 'translate/grt/config/win32.c')
| -rw-r--r-- | translate/grt/config/win32.c | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/translate/grt/config/win32.c b/translate/grt/config/win32.c index 18e5a2d..465f929 100644 --- a/translate/grt/config/win32.c +++ b/translate/grt/config/win32.c @@ -130,6 +130,23 @@ __ghdl_run_through_longjump (int (*func)(void)) return res; } +#include <math.h> + +double acosh (double x) +{ + return log (x + sqrt (x*x - 1)); +} + +double asinh (double x) +{ + return log (x + sqrt (x*x + 1)); +} + +double atanh (double x) +{ + return log ((1 + x) / (1 - x)) / 2; +} + #ifndef WITH_GNAT_RUN_TIME void __gnat_raise_storage_error(void) { |