2000-04-18

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@670 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

eval.c

@@ -6359,8 +6359,10 @@ thread_free(th)
     th->stk_ptr = 0;
     if (th->locals) st_free_table(th->locals);
     if (th->status != THREAD_KILLED) {
-	th->prev->next = th->next;
-	th->next->prev = th->prev;
+	if (th->prev)
+	    th->prev->next = th->next;
+	if (th->next)
+	    th->next->prev = th->prev;
     }
     if (th != main_thread) free(th);
 }