Changeset f6a4917 for libcfa/src/stdlib.cfa

Timestamp:

Aug 25, 2022, 10:43:36 PM (20 months ago)

Author:

Peter A. Buhr <pabuhr@…>

Branches:

ADT, ast-experimental, master, pthread-emulation

Children:

51fbba5

Parents:

d2f09e4

Message:

change C loop control to CFA loop control

File:

• libcfa/src/stdlib.cfa (modified) (4 diffs)

libcfa/src/stdlib.cfa

@@ -10 +10 @@
 // Created On       : Thu Jan 28 17:10:29 2016
 // Last Modified By : Peter A. Buhr
-// Last Modified On : Thu Feb 10 22:41:39 2022
-// Update Count     : 602
+// Last Modified On : Thu Aug 25 22:41:14 2022
+// Update Count     : 604
 //
 
@@ -35 +35 @@
 T * anew( size_t dim, TT p ) {
         T * arr = alloc( dim );
-        for ( unsigned int i = 0; i < dim; i += 1 ) {
+        for ( i; dim ) {
                 (arr[i]){ p };                                                                  // run constructor
         } // for
@@ -45 +45 @@
         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
+                for ( i; 0 -~= dim - 1 ) {                                              // reverse allocation order, must be unsigned
                         ^(arr[i]){};                                                            // run destructor
                 } // for
@@ -56 +56 @@
         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
+                for ( i; 0 -~= dim - 1 ) {                                              // reverse allocation order, must be unsigned
                         ^(arr[i]){};                                                            // run destructor
                 } // for