From 93ebe571a16f2eefc65639ea94c87924d40dfd41 Mon Sep 17 00:00:00 2001 From: schnetter Date: Sat, 29 Jan 2005 17:45:52 +0000 Subject: Use CCTK_BYTE instead of CCTK_CHAR. git-svn-id: http://svn.cactuscode.org/arrangements/CactusBase/LocalReduce/trunk@56 7daa882c-dc44-4453-834e-278d26b18e6a --- src/Norm4Functions.c | 30 +++++++++++++++--------------- 1 file changed, 15 insertions(+), 15 deletions(-) (limited to 'src/Norm4Functions.c') diff --git a/src/Norm4Functions.c b/src/Norm4Functions.c index 469ecb2..f106642 100644 --- a/src/Norm4Functions.c +++ b/src/Norm4Functions.c @@ -18,7 +18,7 @@ extern "C" { #endif -int LocalReduce_Norm4_CHAR(int i, int mask_on, CCTK_INT * input_array_offsets, int * indices, int max_iter, int * actual_indices, CCTK_INT * input_array_strides, CCTK_INT * input_array_min_subscripts,const CCTK_INT * input_array_dims, int num_points, int * actual_iters_per_dim, int * iters_per_dim, int N_dims, const void *const input_arrays[], const CCTK_INT output_number_type_codes[], void * const output_numbers[]) +int LocalReduce_Norm4_BYTE(int i, int mask_on, CCTK_INT * input_array_offsets, int * indices, int max_iter, int * actual_indices, CCTK_INT * input_array_strides, CCTK_INT * input_array_min_subscripts,const CCTK_INT * input_array_dims, int num_points, int * actual_iters_per_dim, int * iters_per_dim, int N_dims, const void *const input_arrays[], const CCTK_INT output_number_type_codes[], void * const output_numbers[]) { int iter = 0; int sum_indices = 0; @@ -42,7 +42,7 @@ int LocalReduce_Norm4_CHAR(int i, int mask_on, CCTK_INT * input_array_offsets, i switch (output_number_type_codes[i]) { /* out values type switches*/ - case CCTK_VARIABLE_CHAR: + case CCTK_VARIABLE_BYTE: ITERATE_ON_ARRAY(i,CCTK_BYTE, input_arrays[i], CCTK_BYTE, output_numbers[i], mask_on, input_array_offsets[i], indices, sum_indices, max_iter, iter, flag, actual_indices,input_array_strides, input_array_min_subscripts,input_array_dims,product) break; case CCTK_VARIABLE_INT: @@ -294,7 +294,7 @@ int LocalReduce_Norm4_INT(int i, int mask_on, CCTK_INT * input_array_offsets, in switch (output_number_type_codes[i]) { /* out values type switches*/ - case CCTK_VARIABLE_CHAR: + case CCTK_VARIABLE_BYTE: ITERATE_ON_ARRAY(i,CCTK_INT, input_arrays[i], CCTK_BYTE, output_numbers[i], mask_on, input_array_offsets[i], indices, sum_indices, max_iter, iter, flag, actual_indices,input_array_strides, input_array_min_subscripts,input_array_dims,product) break; case CCTK_VARIABLE_INT: @@ -544,7 +544,7 @@ int LocalReduce_Norm4_INT1(int i, int mask_on, CCTK_INT * input_array_offsets, i switch (output_number_type_codes[i]) { /* out values type switches*/ - case CCTK_VARIABLE_CHAR: + case CCTK_VARIABLE_BYTE: ITERATE_ON_ARRAY(i,CCTK_INT1, input_arrays[i], CCTK_BYTE, output_numbers[i], mask_on, input_array_offsets[i], indices, sum_indices, max_iter, iter, flag, actual_indices,input_array_strides, input_array_min_subscripts,input_array_dims,product) break; case CCTK_VARIABLE_INT: @@ -797,7 +797,7 @@ int LocalReduce_Norm4_INT2(int i, int mask_on, CCTK_INT * input_array_offsets, i switch (output_number_type_codes[i]) { /* out values type switches*/ - case CCTK_VARIABLE_CHAR: + case CCTK_VARIABLE_BYTE: ITERATE_ON_ARRAY(i,CCTK_INT2, input_arrays[i], CCTK_BYTE, output_numbers[i], mask_on, input_array_offsets[i], indices, sum_indices, max_iter, iter, flag, actual_indices,input_array_strides, input_array_min_subscripts,input_array_dims,product) break; case CCTK_VARIABLE_INT: @@ -1050,7 +1050,7 @@ int LocalReduce_Norm4_INT4(int i, int mask_on, CCTK_INT * input_array_offsets, i switch (output_number_type_codes[i]) { /* out values type switches*/ - case CCTK_VARIABLE_CHAR: + case CCTK_VARIABLE_BYTE: ITERATE_ON_ARRAY(i,CCTK_INT4, input_arrays[i], CCTK_BYTE, output_numbers[i], mask_on, input_array_offsets[i], indices, sum_indices, max_iter, iter, flag, actual_indices,input_array_strides, input_array_min_subscripts,input_array_dims,product) break; case CCTK_VARIABLE_INT: @@ -1303,7 +1303,7 @@ int LocalReduce_Norm4_INT8(int i, int mask_on, CCTK_INT * input_array_offsets, i switch (output_number_type_codes[i]) { /* out values type switches*/ - case CCTK_VARIABLE_CHAR: + case CCTK_VARIABLE_BYTE: ITERATE_ON_ARRAY(i,CCTK_INT8, input_arrays[i], CCTK_BYTE, output_numbers[i], mask_on, input_array_offsets[i], indices, sum_indices, max_iter, iter, flag, actual_indices,input_array_strides, input_array_min_subscripts,input_array_dims,product) break; case CCTK_VARIABLE_INT: @@ -1555,7 +1555,7 @@ int LocalReduce_Norm4_REAL(int i, int mask_on, CCTK_INT * input_array_offsets, i switch (output_number_type_codes[i]) { /* out values type switches*/ - case CCTK_VARIABLE_CHAR: + case CCTK_VARIABLE_BYTE: ITERATE_ON_ARRAY(i,CCTK_REAL, input_arrays[i], CCTK_BYTE, output_numbers[i], mask_on, input_array_offsets[i], indices, sum_indices, max_iter, iter, flag, actual_indices,input_array_strides, input_array_min_subscripts,input_array_dims,product) break; case CCTK_VARIABLE_INT: @@ -1807,7 +1807,7 @@ int LocalReduce_Norm4_REAL4(int i, int mask_on, CCTK_INT * input_array_offsets, switch (output_number_type_codes[i]) { /* out values type switches*/ - case CCTK_VARIABLE_CHAR: + case CCTK_VARIABLE_BYTE: ITERATE_ON_ARRAY(i,CCTK_REAL4, input_arrays[i], CCTK_BYTE, output_numbers[i], mask_on, input_array_offsets[i], indices, sum_indices, max_iter, iter, flag, actual_indices,input_array_strides, input_array_min_subscripts,input_array_dims,product) break; case CCTK_VARIABLE_INT: @@ -2060,7 +2060,7 @@ int LocalReduce_Norm4_REAL8(int i, int mask_on, CCTK_INT * input_array_offsets, switch (output_number_type_codes[i]) { /* out values type switches*/ - case CCTK_VARIABLE_CHAR: + case CCTK_VARIABLE_BYTE: ITERATE_ON_ARRAY(i,CCTK_REAL8, input_arrays[i], CCTK_BYTE, output_numbers[i], mask_on, input_array_offsets[i], indices, sum_indices, max_iter, iter, flag, actual_indices,input_array_strides, input_array_min_subscripts,input_array_dims,product) break; case CCTK_VARIABLE_INT: @@ -2314,7 +2314,7 @@ int LocalReduce_Norm4_REAL16(int i, int mask_on, CCTK_INT * input_array_offsets, switch (output_number_type_codes[i]) { /* out values type switches*/ - case CCTK_VARIABLE_CHAR: + case CCTK_VARIABLE_BYTE: ITERATE_ON_ARRAY(i,CCTK_REAL16, input_arrays[i], CCTK_BYTE, output_numbers[i], mask_on, input_array_offsets[i], indices, sum_indices, max_iter, iter, flag, actual_indices,input_array_strides, input_array_min_subscripts,input_array_dims,product) break; case CCTK_VARIABLE_INT: @@ -2581,7 +2581,7 @@ int LocalReduce_Norm4_COMPLEX(int i, int mask_on, CCTK_INT * input_array_offsets switch (output_number_type_codes[i]) { /* out values type switches*/ - case CCTK_VARIABLE_CHAR: + case CCTK_VARIABLE_BYTE: ITERATE_ON_ARRAY(i,CCTK_COMPLEX, input_arrays[i], CCTK_BYTE, output_numbers[i], mask_on, input_array_offsets[i], indices, sum_indices, max_iter, iter, flag, actual_indices,input_array_strides, input_array_min_subscripts,input_array_dims,product) break; case CCTK_VARIABLE_INT: @@ -2879,7 +2879,7 @@ int LocalReduce_Norm4_COMPLEX8(int i, int mask_on, CCTK_INT * input_array_offset switch (output_number_type_codes[i]) { /* out values type switches*/ - case CCTK_VARIABLE_CHAR: + case CCTK_VARIABLE_BYTE: ITERATE_ON_ARRAY(i,CCTK_COMPLEX8, input_arrays[i], CCTK_BYTE, output_numbers[i], mask_on, input_array_offsets[i], indices, sum_indices, max_iter, iter, flag, actual_indices,input_array_strides, input_array_min_subscripts,input_array_dims,product) break; case CCTK_VARIABLE_INT: @@ -3170,7 +3170,7 @@ int LocalReduce_Norm4_COMPLEX16(int i, int mask_on, CCTK_INT * input_array_offse switch (output_number_type_codes[i]) { /* out values type switches*/ - case CCTK_VARIABLE_CHAR: + case CCTK_VARIABLE_BYTE: ITERATE_ON_ARRAY(i,CCTK_COMPLEX16, input_arrays[i], CCTK_BYTE, output_numbers[i], mask_on, input_array_offsets[i], indices, sum_indices, max_iter, iter, flag, actual_indices,input_array_strides, input_array_min_subscripts,input_array_dims,product) break; case CCTK_VARIABLE_INT: @@ -3461,7 +3461,7 @@ int LocalReduce_Norm4_COMPLEX32(int i, int mask_on, CCTK_INT * input_array_offse switch (output_number_type_codes[i]) { /* out values type switches*/ - case CCTK_VARIABLE_CHAR: + case CCTK_VARIABLE_BYTE: ITERATE_ON_ARRAY(i,CCTK_COMPLEX32, input_arrays[i], CCTK_COMPLEX32, output_numbers[i], mask_on, input_array_offsets[i], indices, sum_indices, max_iter, iter, flag, actual_indices,input_array_strides, input_array_min_subscripts,input_array_dims,product) break; case CCTK_VARIABLE_INT: -- cgit v1.2.3