Index: WriteScalar.c
===================================================================
RCS file: /cactusdevcvs/CactusBase/IOBasic/src/WriteScalar.c,v
retrieving revision 1.17
diff -d -r1.17 WriteScalar.c
152c152
<   int input_array[1];
---
>   CCTK_INT input_array[1];
154c154,155
<   CCTK_REAL output_value;
---
>   CCTK_REAL output_value=-3.141592654;
>   const CCTK_INT output_dim[1]={1};
175c176
<     reduction->is_valid = CCTK_ReduceGridArrays (GH, 0, reduction->handle, -1, 1, input_array , 1, output_array_type_codes, reduction_value) == 0;
---
>     reduction->is_valid = CCTK_ReduceGridArrays (GH, 0, reduction->handle, -1, 1, 1, input_array , 1, 1, output_dim, output_array_type_codes, reduction_value) == 0;