diff options
author | James Van Artsdalen <jrv@gnu.org> | 1992-03-02 08:03:23 +0000 |
---|---|---|
committer | James Van Artsdalen <jrv@gnu.org> | 1992-03-02 08:03:23 +0000 |
commit | 7e1966ca45824f2765cfa4a797f08a5f9980917f (patch) | |
tree | 412b5dc9378bfd387353932cc7bb558eb8bbf89e | |
parent | 6b0ac106717da4c6846285e18c41e8f4a1c64e2d (diff) | |
download | gcc-7e1966ca45824f2765cfa4a797f08a5f9980917f.zip gcc-7e1966ca45824f2765cfa4a797f08a5f9980917f.tar.gz gcc-7e1966ca45824f2765cfa4a797f08a5f9980917f.tar.bz2 |
*** empty log message ***
From-SVN: r374
-rw-r--r-- | gcc/optabs.c | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/gcc/optabs.c b/gcc/optabs.c index 6fd2315..58a36cf 100644 --- a/gcc/optabs.c +++ b/gcc/optabs.c @@ -3995,3 +3995,20 @@ init_optabs () fixunsdfsi_libfunc = gen_rtx (SYMBOL_REF, Pmode, "__fixunsdfsi"); fixunsdfdi_libfunc = gen_rtx (SYMBOL_REF, Pmode, "__fixunsdfdi"); } + +#ifdef BROKEN_LDEXP + +/* SCO 3.2 apparently has a broken ldexp. */ + +double +ldexp(x,n) + double x; + int n; +{ + if (n > 0) + while (n--) + x *= 2; + + return x; +} +#endif /* BROKEN_LDEXP */ |