From 2f9d900118318c1a820b170cc04ddf58ed1eee87 Mon Sep 17 00:00:00 2001
From: rsc <devnull@localhost>
Date: Sat, 9 Jun 2007 04:58:00 +0000
Subject: day one bug in sam regexp code

---
 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 d4c85050..937fb4fe 100644
--- a/src/cmd/sam/regexp.c
+++ b/src/cmd/sam/regexp.c
@@ -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;
-- 
cgit v1.2.3