Changeset a1574e2 for libcfa/src

Timestamp:

Nov 3, 2021, 11:47:55 AM (3 years ago)

Author:

Thierry Delisle <tdelisle@…>

Branches:

ADT, ast-experimental, enum, forall-pointer-decay, master, pthread-emulation, qualifiedEnum

Children:

ab4a595

Parents:

7dd98b6

Message:

Forgot this was needed for the non-VLA commit.

File:

• libcfa/src/concurrency/monitor.hfa (modified) (1 diff)

libcfa/src/concurrency/monitor.hfa

@@ -65 +65 @@
         free( th );
 }
+
+static inline forall( T & | sized(T) | { void ^?{}( T & mutex ); } )
+void adelete( T arr[] ) {
+        if ( arr ) {                                                                            // ignore null
+                size_t dim = malloc_size( arr ) / sizeof( T );
+                for ( int i = dim - 1; i >= 0; i -= 1 ) {               // reverse allocation order, must be unsigned
+                        ^(arr[i]){};                                                            // run destructor
+                } // for
+                free( arr );
+        } // if
+} // adelete
 
 //-----------------------------------------------------------------------------