Correct the bug introduced by gcc 4.x compliance.

Basically : you cannot uses ABL_ARITY_L() macro with the '--'
(postfixed decrement) because a pointer is unsigned and crossing
zero seems to produce strange results in our case.
This commit is contained in:
Jean-Paul Chaput 2007-07-18 16:37:36 +00:00
parent 18a20b5227
commit d5236e86f5
1 changed files with 2 additions and 2 deletions

View File

@ -161,7 +161,7 @@ static chain_list* loc_adapt_abl(chain_list* expr, float C)
int arity=ABL_ARITY(expr); /*memorize arity*/
/*search the biggest arity which matches expr*/
for (ABL_ARITY_L(expr)=ABL_ARITY(expr)-1 ; ABL_ARITY(expr)>0;
ABL_ARITY_L(expr)--) {
ABL_ARITY_L(expr)=ABL_ARITY(expr)-1) {
cell=cell_prepare(expr);
if (cell) break;
}
@ -242,7 +242,7 @@ extern chain_list* adapt_abl(chain_list* expr)
arity=ABL_ARITY(expr); /*memorize arity*/
/*search the biggest arity which matches expr*/
for (ABL_ARITY_L(expr)=ABL_ARITY(expr)-1 ; ABL_ARITY(expr)>0;
ABL_ARITY_L(expr)--) {
ABL_ARITY_L(expr)=ABL_ARITY(expr)-1) {
cell=cell_prepare(expr);
if (cell) break;
}