Changes in tests/array-collections/boxed.main.cfa [2e63915:fd4df379]

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 ) {
-    (void) vart;
+char * allocAndAccess_13 ( size_t expectedElmSz, const char * tcid, const char * 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;
@@ -374 +373 @@
     return 0p;
 }
-bigun * allocAndAccess_13( size_t expectedElmSz, const char * tcid, const char * vart ) {
-    (void) vart;
+bigun * allocAndAccess_13( size_t expectedElmSz, const char * tcid, const char * 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;
@@ -385 +383 @@
 // ---------- 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 ) {
-    (void) vart;
+double * allocAndAccess_14 ( size_t expectedElmSz, const char * tcid, const char * 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;
@@ -400 +397 @@
 // ---------- 15, operators
 
-forall( T* ) void access_15 ( T x[] ) {
+forall( T* ) void access_15 ( size_t expectedElmSz, T x[] ) {
     // correctness of x and ?[?] established by earlier tests
     T * x5 = & x[5];
@@ -417 +414 @@
 
     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 );
@@ -424 +421 @@
 
 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( x );
+    access_15( expectedElmSz, x );
     return 0p;
 }