fix error message (Ulrich's #184).
This commit is contained in:
@@ -301,7 +301,7 @@ eval1(Int fi, Term t) {
|
|||||||
out = asin(dbl);
|
out = asin(dbl);
|
||||||
#if HAVE_ISNAN
|
#if HAVE_ISNAN
|
||||||
if (isnan(out)) {
|
if (isnan(out)) {
|
||||||
return Yap_ArithError(DOMAIN_ERROR_OUT_OF_RANGE, t, "atanh(%f)", dbl);
|
return Yap_ArithError(EVALUATION_ERROR_UNDEFINED, t, "asin(%f)", dbl);
|
||||||
}
|
}
|
||||||
#endif
|
#endif
|
||||||
RFLOAT(out);
|
RFLOAT(out);
|
||||||
@@ -314,7 +314,7 @@ eval1(Int fi, Term t) {
|
|||||||
out = acos(dbl);
|
out = acos(dbl);
|
||||||
#if HAVE_ISNAN
|
#if HAVE_ISNAN
|
||||||
if (isnan(out)) {
|
if (isnan(out)) {
|
||||||
return Yap_ArithError(DOMAIN_ERROR_OUT_OF_RANGE, t, "atanh(%f)", dbl);
|
return Yap_ArithError(EVALUATION_ERROR_UNDEFINED, t, "acos(%f)", dbl);
|
||||||
}
|
}
|
||||||
#endif
|
#endif
|
||||||
RFLOAT(out);
|
RFLOAT(out);
|
||||||
|
Reference in New Issue
Block a user