0 / -1 confusion for properties (2 bugs reported by sater).
This commit is contained in:
parent
dcb4b71a3d
commit
de79024451
1 changed files with 2 additions and 2 deletions
|
@ -318,7 +318,7 @@ if (Debug>1) fprintf(stderr,"findcoerc returns %d at position %d\n",cp,i);
|
|||
CHKCOST();
|
||||
break;
|
||||
} else {
|
||||
if (cp->c3_prop==0) {
|
||||
if (cp->c3_prop<0) {
|
||||
totalcost+=docoerc(tp,cp,ply,toplevel,0);
|
||||
CHKCOST();
|
||||
} else {
|
||||
|
@ -361,7 +361,7 @@ if(Debug>1) fprintf(stderr,"Pattern too long, %d with only %d items on stack\n",
|
|||
goto normalfailed;
|
||||
#endif
|
||||
}
|
||||
if (cp->c3_prop==0) {
|
||||
if (cp->c3_prop<0) {
|
||||
totalcost+=docoerc(tp,cp,ply,toplevel,0);
|
||||
CHKCOST();
|
||||
} else {
|
||||
|
|
Loading…
Reference in a new issue