From 3a9401ae90d2a16c7a06328d397775ca5b46ffc0 Mon Sep 17 00:00:00 2001
From: Russ Cox <rsc@swtch.com>
Date: Wed, 30 Jan 2008 13:47:07 -0500
Subject: sam: fix regexp match choice bug

---
 src/cmd/sam/regexp.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/cmd/sam')

diff --git a/src/cmd/sam/regexp.c b/src/cmd/sam/regexp.c
index 8beaa036..3477baef 100644
--- a/src/cmd/sam/regexp.c
+++ b/src/cmd/sam/regexp.c
@@ -772,7 +772,7 @@ bexecute(File *f, Posn startp)
 				break;
 			case OR:
 				/* evaluate right choice later */
-				if(addinst(tl, inst->right, &tlp->se))
+				if(addinst(tlp, inst->right, &tlp->se))
 				if(++ntl >= NLIST)
 					goto Overflow;
 				/* efficiency: advance and re-evaluate */
-- 
cgit v1.2.3