Changeset d3ab183 for libcfa/src/concurrency/alarm.hfa

Timestamp:

May 4, 2020, 8:59:09 PM (4 years ago)

Author:

Michael Brooks <mlbrooks@…>

Branches:

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

Children:

08a994e, f90d10f

Parents:

4d741e9

Message:

Using dlist in alarm.

Minimal interface changes in alarm.hfa applied; some spill to preemption.cfa occured.

List management logic removed, including such helper functions from alarm.cfa. Remaining logic is concurrency-protection wrapping, and picking insertion point by traversing and comparing alarm-fire times.

Integrity checking definitions removed here. Calling version brought into list.hfa by change 4d741 instead.

File:

• libcfa/src/concurrency/alarm.hfa (modified) (4 diffs)

libcfa/src/concurrency/alarm.hfa

@@ -23 +23 @@
 #include "time.hfa"
 
+#include <containers/list.hfa>
+
 struct $thread;
 struct processor;
@@ -40 +42 @@
         Time alarm;                             // time when alarm goes off
         Duration period;                        // if > 0 => period of alarm
-        alarm_node_t * next;            // intrusive link list field
+
+        DLISTED_MGD_IMPL_IN(alarm_node_t)
 
         union {
@@ -50 +53 @@
         bool kernel_alarm       :1;             // true if this is not a user defined alarm
 };
-
-typedef alarm_node_t ** __alarm_it_t;
+DLISTED_MGD_IMPL_OUT(alarm_node_t)
 
 void ?{}( alarm_node_t & this, $thread * thrd, Time alarm, Duration period );
@@ -57 +59 @@
 void ^?{}( alarm_node_t & this );
 
-struct alarm_list_t {
-        alarm_node_t * head;
-        __alarm_it_t tail;
-};
-
-static inline void ?{}( alarm_list_t & this ) with( this ) {
-        head = 0;
-        tail = &head;
-}
+typedef dlist(alarm_node_t, alarm_node_t) alarm_list_t;
 
 void insert( alarm_list_t * this, alarm_node_t * n );