From afa0799504f8edc55af464412d37adc4ab110b65 Mon Sep 17 00:00:00 2001
From: Vitor Santos Costa <vsc@dcc.fc.up.pt>
Date: Fri, 8 Oct 2010 10:50:23 +0100
Subject: [PATCH] fix error message (Ulrich's #184).

---
 C/arith1.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/C/arith1.c b/C/arith1.c
index 3b0b0ce68..3702e64ec 100755
--- a/C/arith1.c
+++ b/C/arith1.c
@@ -301,7 +301,7 @@ eval1(Int fi, Term t) {
       out = asin(dbl);
 #if HAVE_ISNAN
       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
       RFLOAT(out);
@@ -314,7 +314,7 @@ eval1(Int fi, Term t) {
       out = acos(dbl);
 #if HAVE_ISNAN
       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
       RFLOAT(out);