day one bug in sam regexp code

This commit is contained in:
rsc 2007-06-09 04:58:00 +00:00
parent 63408c39a1
commit 2f9d900118
3 changed files with 3 additions and 3 deletions

View file

@ -668,7 +668,7 @@ rxexecute(Text *t, Rune *r, uint startp, uint eof, Rangeset *rp)
/* evaluate right choice later */
if(++ntl >= NLIST)
goto Overflow;
addinst(tlp, inst->u.right, &tlp->se);
addinst(tl, inst->u.right, &tlp->se);
/* efficiency: advance and re-evaluate */
inst = inst->u1.left;
goto Switchstmt;

View file

@ -647,7 +647,7 @@ execute(File *f, Posn startp, Posn eof)
/* evaluate right choice later */
if(++ntl >= NLIST)
goto Overflow;
addinst(tlp, inst->right, &tlp->se);
addinst(tl, inst->right, &tlp->se);
/* efficiency: advance and re-evaluate */
inst = inst->left;
goto Switchstmt;

View file

@ -132,7 +132,7 @@ regexec1(Reprog *progp, /* program to run */
break;
case OR:
/* evaluate right choice later */
if(_renewthread(tlp, inst->u1.right, ms, &tlp->se) == tle)
if(_renewthread(tl, inst->u1.right, ms, &tlp->se) == tle)
return -1;
/* efficiency: advance and re-evaluate */
continue;