- File:
-
- 1 edited
-
tests/array-container/array-basic.cfa (modified) (6 diffs)
Legend:
- Unmodified
- Added
- Removed
-
tests/array-container/array-basic.cfa
rb9dae14c rc7625e0 5 5 // 6 6 7 forall( [Nx], [Ny], [Nz])7 forall( ztype(Nx), ztype(Ny), ztype(Nz) ) 8 8 void typesTest( tag(Nx), tag(Ny), tag(Nz) ) { 9 9 … … 59 59 } 60 60 61 forall( [Nw], [Nx], [Ny], [Nz])61 forall( ztype(Nw), ztype(Nx), ztype(Ny), ztype(Nz) ) 62 62 void fillHelloData( array( float, Nw, Nx, Ny, Nz ) & wxyz ) { 63 63 for (w; z(Nw)) … … 68 68 } 69 69 70 forall( [Zn]70 forall( ztype(Zn) 71 71 , S & | sized(S) 72 72 ) … … 86 86 } 87 87 88 forall( [Nw], [Nx], [Ny], [Nz])88 forall( ztype(Nw), ztype(Nx), ztype(Ny), ztype(Nz) ) 89 89 void runtimeTest( tag(Nw), tag(Nx), tag(Ny), tag(Nz) ) { 90 90 … … 105 105 printf("result Ws [][][][] lo = %f\n", result); 106 106 107 result = total1d_low( wxyz[[all, slice_ix, slice_ix, slice_ix]] ); 108 printf("result Ws [,,,] lo = %f\n", result); 107 // fixme: -[[-,-,-,-]] not working 108 // result = total1d_low( wxyz[[all, slice_ix, slice_ix, slice_ix]] ); 109 // printf("result Ws [,,,] lo = %f\n", result); 109 110 110 111 result = total1d_hi( wxyz[all][slice_ix][slice_ix][slice_ix] ); 111 112 printf("result Ws [][][][] hi = %f\n", result); 112 113 113 result = total1d_hi( wxyz[[all, slice_ix, slice_ix, slice_ix]] ); 114 printf("result Ws [,,,] hi = %f\n", result); 114 // fixme: -[[-,-,-,-]] not working 115 // result = total1d_hi( wxyz[[all, slice_ix, slice_ix, slice_ix]] ); 116 // printf("result Ws [,,,] hi = %f\n", result); 115 117 116 118 // summing across X, with w=y=z=1 … … 124 126 printf("result Xs [][][][] lo = %f\n", result); 125 127 126 result = total1d_low( wxyz[[slice_ix, all, slice_ix, slice_ix]] ); 127 printf("result Xs [,,,] lo = %f\n", result); 128 // fixme: -[[-,-,-,-]] not working 129 // result = total1d_low( wxyz[[slice_ix, all, slice_ix, slice_ix]] ); 130 // printf("result Xs [,,,] lo = %f\n", result); 128 131 129 132 result = total1d_hi( wxyz[slice_ix][all][slice_ix][slice_ix] ); 130 133 printf("result Xs [][][][] hi = %f\n", result); 131 134 132 result = total1d_hi( wxyz[[slice_ix, all, slice_ix, slice_ix]] ); 133 printf("result Xs [,,,] hi = %f\n", result); 135 // fixme: -[[-,-,-,-]] not working 136 // result = total1d_hi( wxyz[[slice_ix, all, slice_ix, slice_ix]] ); 137 // printf("result Xs [,,,] hi = %f\n", result); 134 138 135 139 }
Note:
See TracChangeset
for help on using the changeset viewer.