Changeset 8893ad4 for tests/array-collections/boxed.main.cfa

Timestamp:

Jan 4, 2025, 1:09:49 AM (4 weeks ago)

Author:

Fangren Yu <f37yu@…>

Branches:

master

Children:

58eb9250

Parents:

6b95feb (diff), 2e63915 (diff)
Note: this is a merge changeset, the changes displayed below correspond to the merge itself.
Use the (diff) links above to see all the changes relative to each parent.

Message:

Merge branch 'master' of plg.uwaterloo.ca:software/cfa/cfa-cc

File:

• tests/array-collections/boxed.main.cfa (modified) (6 diffs)

tests/array-collections/boxed.main.cfa

@@ -366 +366 @@
     SHOW_ACCESS_1D(42)
 }
-char * allocAndAccess_13 ( size_t expectedElmSz, const char * tcid, const char * vart ) { 
+char * allocAndAccess_13 ( size_t expectedElmSz, const char * tcid, const char * vart ) {
+    (void) vart;
     printf("------- 13%s (communication, mono-poly direct, by param T[]): char x[42], expecting %zd-byte elems\n", tcid, expectedElmSz);
     char x[ 42 ] INITARR;
@@ -373 +374 @@
     return 0p;
 }
-bigun * allocAndAccess_13( size_t expectedElmSz, const char * tcid, const char * vart ) { 
+bigun * allocAndAccess_13( size_t expectedElmSz, const char * tcid, const char * vart ) {
+    (void) vart;
     printf("------- 13%s (communication, mono-poly direct, by param T[]): bigun x[42], expecting %zd-byte elems\n", tcid, expectedElmSz);
     bigun x[ 42 ] INITARR;
@@ -383 +385 @@
 // ---------- 14, comm, MPD, PARR
 
-forall( T* ) void access_14 ( size_t expectedElmSz, T (*temp)[42] ) { 
+forall( T* ) void access_14 ( size_t expectedElmSz, T (*temp)[42] ) {
     T * x = *temp;
     SHOW_ACCESS_1D(42)
 }
-double * allocAndAccess_14 ( size_t expectedElmSz, const char * tcid, const char * vart ) { 
+double * allocAndAccess_14 ( size_t expectedElmSz, const char * tcid, const char * vart ) {
+    (void) vart;
     printf("------- 13%s (communication, mono-poly direct, by param T(*)[*]): double x[42], expecting %zd-byte elems\n", tcid, expectedElmSz);
     double x[ 42 ] INITARR;
@@ -397 +400 @@
 // ---------- 15, operators
 
-forall( T* ) void access_15 ( size_t expectedElmSz, T x[] ) {
+forall( T* ) void access_15 ( T x[] ) {
     // correctness of x and ?[?] established by earlier tests
     T * x5 = & x[5];
@@ -414 +417 @@
 
     ptrdiff_t expPos5 = x5 - x;
-    ptrdiff_t expNeg5 = x - x5;
+//  ptrdiff_t expNeg5 = x - x5;
 
     printf( "?-? +ve off by %zd\n", ((ptrdiff_t) 5) - expPos5 );
@@ -421 +424 @@
 
 forall( T ) T * allocAndAccess_15 ( size_t expectedElmSz, const char * tcid, const char * vart ) { 
+    (void) expectedElmSz;
     printf("------- 15%s (operators): T x[42], expecting T=%s, got sizeof(T)=%zd, expecting %zd-byte elems\n", tcid, vart, sizeof(T), expectedElmSz);
     T x[ 42 ] INITARR;
     // bookends unused
-    access_15( expectedElmSz, x );
+    access_15( x );
     return 0p;
 }