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)
{
return Yap_FoundArithError(eval1(f,t), t);
return eval1(f,t);
}
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)
{
return Yap_FoundArithError(eval2(f,t1,t2), 0L);
return eval2(f,t1,t2);
}
static InitBinEntry InitBinTab[] = {