From b256ec3b6630233ed42054938a19320e282cbdd9 Mon Sep 17 00:00:00 2001
From: David du Colombier <0intro@gmail.com>
Date: Sat, 14 Oct 1995 00:00:00 +0000
Subject: [PATCH] Plan 9 from Bell Labs 1995-10-14

---
 port/taslock.c | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/port/taslock.c b/port/taslock.c
index 84b22821b86b258a8a3ca2ea07feed314a58a7f2..553e7ecffb4783ac1f0ab8694e4b0610e6a5dc3b 100644
--- a/port/taslock.c
+++ b/port/taslock.c
@@ -21,9 +21,9 @@ lock(Lock *l)
 	for(;;){
 		i = 0;
 		while(l->key)
-			if(i++ > 10000000)
-				panic("lock loop key 0x%lux pc 0x%lux held by pc 0x%lux\n",
-					l->key, getcallerpc(l), l->pc);
+			if(i++ > 100000000)
+				panic("lock loop key 0x%lux pc 0x%lux held by pc 0x%lux pl 0x%lux\n",
+					l->key, pc, l->pc, splhi());
 		if(tas(&l->key) == 0){
 			l->pc = pc;
 			return;
@@ -71,6 +71,7 @@ void
 unlock(Lock *l)
 {
 	l->key = 0;
+	l->pc = 0;
 }
 
 void
@@ -80,5 +81,6 @@ iunlock(Lock *l)
 
 	sr = l->sr;
 	l->key = 0;
+	l->pc = 0;
 	splx(sr);
 }