Changeset d384787 for libcfa/src/concurrency/kernel.cfa

Timestamp:

Apr 24, 2020, 1:54:29 PM (4 years ago)

Author:

Thierry Delisle <tdelisle@…>

Branches:

ADT, arm-eh, ast-experimental, enum, forall-pointer-decay, jacob/cs343-translation, master, new-ast, new-ast-unique-expr, pthread-emulation, qualifiedEnum

Children:

0ea6c5a

Parents:

ecf6b46

Message:

Added basic statistics to io.cfa

File:

• libcfa/src/concurrency/kernel.cfa (modified) (1 diff)

libcfa/src/concurrency/kernel.cfa

@@ -1004 +1004 @@
 }
 
+bool V(semaphore & this, unsigned diff) with( this ) {
+        $thread * thrd = 0p;
+        lock( lock __cfaabi_dbg_ctx2 );
+        int release = max(-count, (int)diff);
+        count += diff;
+        for(release) {
+                unpark( pop_head( waiting ) __cfaabi_dbg_ctx2 );
+        }
+
+        unlock( lock );
+
+        return thrd != 0p;
+}
+
 //-----------------------------------------------------------------------------
 // Global Queues