diff options
author | yye00 <yye00@89daf98e-ef62-4674-b946-b8ff9de2216c> | 2005-12-21 20:00:46 +0000 |
---|---|---|
committer | yye00 <yye00@89daf98e-ef62-4674-b946-b8ff9de2216c> | 2005-12-21 20:00:46 +0000 |
commit | 0b34a3d107e3347c33971a9d505a840d6b53bb36 (patch) | |
tree | ac4ee949f539f363d2b725251f46f9e181179f61 /src | |
parent | fcb0384e4cf164894f0dcd6dd24156c5e1c1da4a (diff) |
fixed a memory leak
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/AHFinder/trunk@388 89daf98e-ef62-4674-b946-b8ff9de2216c
Diffstat (limited to 'src')
-rw-r--r-- | src/AHFinder_gau.F | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/AHFinder_gau.F b/src/AHFinder_gau.F index 1a27d21..9ecad73 100644 --- a/src/AHFinder_gau.F +++ b/src/AHFinder_gau.F @@ -692,7 +692,7 @@ c#include "CactusEinstein/ADMMacros/src/macro/ADM_Spacing_declare.h" call CCTK_ReduceArraysGlobally(ierror, cctkGH, -1,sum_handle, -1, . 3, input_array,0, 0, input_array_type3, 3, - . input_array_type3, reduction_value) + . input_array_type3, reduction_value3) if (ierror.ne.0) then call CCTK_WARN(1,"Reduction failed!") |