Changeset e50d9cb8 for libcfa/src/concurrency/kernel

Timestamp:

Nov 1, 2022, 10:06:40 PM (3 years ago)

Author:

Peter A. Buhr <pabuhr@…>

Branches:

ADT, ast-experimental, master

Children:

7cf8006

Parents:

0bdfcc3 (diff), 03c56f6 (diff)
Note: this is a merge changeset, the changes displayed below correspond to the merge itself.
Use the (diff) links above to see all the changes relative to each parent.

Message:

Merge branch 'master' of plg.uwaterloo.ca:software/cfa/cfa-cc

File:

• libcfa/src/concurrency/kernel/startup.cfa (modified) (4 diffs)

libcfa/src/concurrency/kernel/startup.cfa

@@ -535 +535 @@
         #endif
 
-        node.next = 0p;
-        node.prev = 0p;
         doregister(curr_cluster, this);
 
@@ -659 +657 @@
         #endif
 
-        threads{ __get };
+        threads{};
 
         io.arbiter = create();
@@ -739 +737 @@
         lock      (cltr->thread_list_lock __cfaabi_dbg_ctx2);
         cltr->nthreads += 1;
-        push_front(cltr->threads, thrd);
+        insert_first(cltr->threads, thrd);
         unlock    (cltr->thread_list_lock);
 }
@@ -745 +743 @@
 void unregister( cluster * cltr, thread$ & thrd ) {
         lock  (cltr->thread_list_lock __cfaabi_dbg_ctx2);
-        remove(cltr->threads, thrd );
-        cltr->nthreads -= 1;
+        {
+                tytagref( dlink(thread$), dlink(thread$) ) ?`inner( thread$ & this ) = void;
+                with( DLINK_VIA( thread$, thread$.cltr_link ) )
+                        remove( thrd );
+                cltr->nthreads -= 1;
+        }
         unlock(cltr->thread_list_lock);
 }