Changeset d923fca for tests/concurrency/actors/matrixMultiply.cfa

Timestamp:

Feb 18, 2025, 12:54:23 PM (6 weeks ago)

Author:

Andrew Beach <ajbeach@…>

Branches:

master

Children:

8705a11

Parents:

3e5fea2

Message:

Clean-up the warnings of the concurrency tests. A lot of little test level fixes, the most interesting repeated one is some formally redundent fallthough statements. pthread_attr_test had to be rewritten because of library restrictions. Changed some types so they would always be pointer sized. There was a library change, there was a function that could not be implemented; I trust that it is included for a reason so I just put it in a comment. There is a change to the compiler, wait-until now uses goto. The labelled breaks were code generated as unlabelled breaks and although it worked out slipped through some checks. Finally, there is one warning that I cannot solve at this time so tests that produce it have been put in their own lax group.

File:

• tests/concurrency/actors/matrixMultiply.cfa (modified) (5 diffs)

tests/concurrency/actors/matrixMultiply.cfa ¶

@@ -24 +24 @@
 }
 
-allocation receive( derived_actor & receiver, derived_msg & msg ) {
+allocation receive( derived_actor &, derived_msg & msg ) {
         for ( i; yc ) {                                                                         // multiply X_row by Y_col and sum products
                 msg.Z[i] = 0;
@@ -41 +41 @@
                         if ( Processors < 1 ) fallthrough default;
                 } // if
+        fallthrough;
           case 4:
                 if ( strcmp( argv[3], "d" ) != 0 ) {                    // default ?
@@ -46 +47 @@
                         if ( xr < 1 ) fallthrough default;
                 } // if
+        fallthrough;
           case 3:
                 if ( strcmp( argv[2], "d" ) != 0 ) {                    // default ?
@@ -51 +53 @@
                         if ( xc < 1 ) fallthrough default;
                 } // if
+        fallthrough;
           case 2:
                 if ( strcmp( argv[1], "d" ) != 0 ) {                    // default ?
@@ -56 +59 @@
                         if ( yc < 1 ) fallthrough default;
                 } // if
+        fallthrough;
           case 1:                                                                                       // use defaults
                 break;