Changeset 622

Timestamp:

Mar 6, 2004, 11:49:07 PM (21 years ago)

Author:

Gary Byers

Message:

Lock the area_lock while threads are suspended. TCR cleanup frees tlb_pointer.

File:

• trunk/ccl/lisp-kernel/thread_manager.c (modified) (3 diffs)

trunk/ccl/lisp-kernel/thread_manager.c

@@ -483 +483 @@
     destroy_semaphore(&tcr->reset_completion);
     destroy_semaphore(&tcr->activate);
+    free(tcr->tlb_pointer);
+    tcr->tlb_pointer = NULL;
+    tcr->tlb_limit = 0;
     tcr->osid = 0;
     UNLOCK(lisp_global(AREA_LOCK),tcr);
@@ -836 +839 @@
 
   LOCK(lisp_global(TCR_LOCK), current);
+  LOCK(lisp_global(AREA_LOCK), current);
   for (other = current->next; other != current; other = other->next) {
     if ((other->osid != 0)) {
@@ -865 +869 @@
     resume_tcr(other);
   }
+  UNLOCK(lisp_global(AREA_LOCK), current);
   UNLOCK(lisp_global(TCR_LOCK), current);
 }