Ulrich Neumerkel's patch so that variables are declared in front of a block.

This commit is contained in:
Vitor Santos Costa
2009-05-02 10:54:09 -05:00
parent a8e3af4c33
commit 2016e118b3
6 changed files with 87 additions and 70 deletions

View File

@@ -547,8 +547,8 @@ a_cmp(Term t1, Term t2)
}
t1 = Yap_Eval(t1);
if (IsIntegerTerm(t1)) {
t2 = Yap_Eval(t2);
Int i1 = IntegerOfTerm(t1);
t2 = Yap_Eval(t2);
if (IsIntegerTerm(t2)) {
Int i2 = IntegerOfTerm(t2);
@@ -565,8 +565,8 @@ a_cmp(Term t1, Term t2)
return FALSE;
}
} else if (IsFloatTerm(t1)) {
t2 = Yap_Eval(t2);
Float f1 = FloatOfTerm(t1);
t2 = Yap_Eval(t2);
if (IsIntegerTerm(t2)) {
Int i2 = IntegerOfTerm(t2);