fix compilation without P

2013-10-29 12:42:55 +00:00 · 2013-10-29 12:42:55 +00:00 · 35b7f040d5
commit 35b7f040d5
parent 96611027f3
1 changed files with 2 additions and 0 deletions
--- a/H/eval.h
+++ b/H/eval.h
@ -188,6 +188,7 @@ Yap_Eval(Term t)
  return Yap_InnerEval(t);
 }

+#ifdef P
 inline static Term
 Yap_FoundArithError(Term t, Term inp)
 { 
@ -199,6 +200,7 @@ Yap_FoundArithError(Term t, Term inp)
  }
  return t;
 }
+#endif


 #define RINT(v)       return(MkIntegerTerm(v))