OpenCores
URL https://opencores.org/ocsvn/or1k/or1k/trunk

Subversion Repositories or1k

[/] [or1k/] [trunk/] [newlib/] [newlib/] [libm/] [math/] [wf_atanh.c] - Diff between revs 39 and 56

Go to most recent revision | Show entire file | Details | Blame | View Log

Rev 39 Rev 56
Line 37... Line 37...
        if(y>=(float)1.0) {
        if(y>=(float)1.0) {
            if(y>(float)1.0) {
            if(y>(float)1.0) {
                /* atanhf(|x|>1) */
                /* atanhf(|x|>1) */
                exc.type = DOMAIN;
                exc.type = DOMAIN;
                exc.name = "atanhf";
                exc.name = "atanhf";
 
                exc.err = 0;
 
                exc.arg1 = exc.arg2 = (double)x;
                exc.retval = 0.0/0.0;
                exc.retval = 0.0/0.0;
                if (_LIB_VERSION == _POSIX_)
                if (_LIB_VERSION == _POSIX_)
                  errno = EDOM;
                  errno = EDOM;
                else if (!matherr(&exc)) {
                else if (!matherr(&exc)) {
                  errno = EDOM;
                  errno = EDOM;
                }
                }
            } else {
            } else {
                /* atanhf(|x|=1) */
                /* atanhf(|x|=1) */
                exc.type = SING;
                exc.type = SING;
                exc.name = "atanhf";
                exc.name = "atanhf";
 
                exc.err = 0;
 
                exc.arg1 = exc.arg2 = (double)x;
                exc.retval = x/0.0;     /* sign(x)*inf */
                exc.retval = x/0.0;     /* sign(x)*inf */
                if (_LIB_VERSION == _POSIX_)
                if (_LIB_VERSION == _POSIX_)
                  errno = EDOM;
                  errno = EDOM;
                else if (!matherr(&exc)) {
                else if (!matherr(&exc)) {
                  errno = EDOM;
                  errno = EDOM;

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.