avoid excessive error testing

This commit is contained in:
Vitor Santos Costa 2010-01-03 15:43:07 -02:00
parent da4aa804a7
commit 33f3dcc3d1
2 changed files with 2 additions and 2 deletions

View File

@ -746,7 +746,7 @@ eval1(Int fi, Term t) {
Term Yap_eval_unary(Int f, Term t) Term Yap_eval_unary(Int f, Term t)
{ {
return Yap_FoundArithError(eval1(f,t), t); return eval1(f,t);
} }
static InitUnEntry InitUnTab[] = { static InitUnEntry InitUnTab[] = {

View File

@ -1076,7 +1076,7 @@ eval2(Int fi, Term t1, Term t2) {
Term Yap_eval_binary(Int f, Term t1, Term t2) Term Yap_eval_binary(Int f, Term t1, Term t2)
{ {
return Yap_FoundArithError(eval2(f,t1,t2), 0L); return eval2(f,t1,t2);
} }
static InitBinEntry InitBinTab[] = { static InitBinEntry InitBinTab[] = {