Index: kern_ktrace.c
===================================================================
RCS file: /usr/repo/src/sys/kern/kern_ktrace.c,v
retrieving revision 1.99
diff -u -p -r1.99 kern_ktrace.c
--- kern_ktrace.c	9 Jun 2005 18:33:21 -0000	1.99
+++ kern_ktrace.c	21 Jun 2005 11:28:07 -0000
@@ -613,8 +613,10 @@ ktrace(td, uap)
 		 * from going away, so unlocking the proc here is ok.
 		 */
 		PROC_UNLOCK(p);
-		if (error)
+		if (error) {
+			sx_sunlock(&proctree_lock);
 			goto done;
+		}
 		if (descend)
 			ret |= ktrsetchildren(td, p, ops, facs, vp);
 		else