diff options
| author | tradke <tradke@89daf98e-ef62-4674-b946-b8ff9de2216c> | 2002-06-04 09:43:30 +0000 |
|---|---|---|
| committer | tradke <tradke@89daf98e-ef62-4674-b946-b8ff9de2216c> | 2002-06-04 09:43:30 +0000 |
| commit | d4ba2773b3161013c4bb2a450840d577db9bd1d5 (patch) | |
| tree | d8e2987924f172763b797cff1efc55979d13b189 | |
| parent | 9640fac572718259e4b4c850fd6d9ec163f35f42 (diff) | |
Initialize ahfmask each time storage was switched on.
This fixes core dumps in the testsuites on the T3E and DEC Alphas.
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/AHFinder/trunk@308 89daf98e-ef62-4674-b946-b8ff9de2216c
| -rw-r--r-- | src/AHFinder.F | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/AHFinder.F b/src/AHFinder.F index 9abcc1f..364e301 100644 --- a/src/AHFinder.F +++ b/src/AHFinder.F @@ -95,7 +95,7 @@ ! sure that the mask is 1 and not 0 in case some other ! thorn wants to use it. - if (cctk_iteration.eq.0) then + if (cctk_iteration.eq.0 .or. CCTK_EQUALS(ahf_mask, "off")) then ahmask = one end if |