From 7649c6d2157b6bed1c578779f734c7b7902cfe32 Mon Sep 17 00:00:00 2001 From: hawke Date: Wed, 21 Apr 2004 17:10:41 +0000 Subject: Fix memory leak. Hint to self: NEVER use group names when trying to extract group information. git-svn-id: http://svn.cactuscode.org/arrangements/CactusNumerical/MoL/trunk@64 578cdeb0-5ea1-4b81-8215-5a3b8777ee0b --- src/InitialCopy.c | 32 ++++++++++++++++---------------- 1 file changed, 16 insertions(+), 16 deletions(-) diff --git a/src/InitialCopy.c b/src/InitialCopy.c index 05a8dfb..4f6f856 100644 --- a/src/InitialCopy.c +++ b/src/InitialCopy.c @@ -105,8 +105,8 @@ void MoL_InitialCopy(CCTK_ARGUMENTS) for (var = 0; var < MoLNumEvolvedVariables; var++) { - StorageOn = CCTK_QueryGroupStorage(cctkGH, - CCTK_GroupNameFromVarI(EvolvedVariableIndex[var])); + StorageOn = CCTK_QueryGroupStorageI(cctkGH, + CCTK_GroupIndexFromVarI(EvolvedVariableIndex[var])); if (StorageOn < 0) { @@ -185,8 +185,8 @@ void MoL_InitialCopy(CCTK_ARGUMENTS) for (var = 0; var < MoLNumEvolvedComplexVariables; var++) { - StorageOn = CCTK_QueryGroupStorage(cctkGH, - CCTK_GroupNameFromVarI(EvolvedComplexVariableIndex[var])); + StorageOn = CCTK_QueryGroupStorageI(cctkGH, + CCTK_GroupIndexFromVarI(EvolvedComplexVariableIndex[var])); if (StorageOn < 0) { @@ -226,8 +226,8 @@ void MoL_InitialCopy(CCTK_ARGUMENTS) for (var = 0; var < MoLNumSandRVariables; var++) { - StorageOn = CCTK_QueryGroupStorage(cctkGH, - CCTK_GroupNameFromVarI(SandRVariableIndex[var])); + StorageOn = CCTK_QueryGroupStorageI(cctkGH, + CCTK_GroupIndexFromVarI(SandRVariableIndex[var])); if (StorageOn < 0) { @@ -283,8 +283,8 @@ void MoL_InitialCopy(CCTK_ARGUMENTS) for (var = 0; var < MoLNumSandRComplexVariables; var++) { - StorageOn = CCTK_QueryGroupStorage(cctkGH, - CCTK_GroupNameFromVarI(SandRComplexVariableIndex[var])); + StorageOn = CCTK_QueryGroupStorageI(cctkGH, + CCTK_GroupIndexFromVarI(SandRComplexVariableIndex[var])); if (StorageOn < 0) { @@ -330,8 +330,8 @@ void MoL_InitialCopy(CCTK_ARGUMENTS) for (var = 0; var < MoLNumConstrainedVariables; var++) { - StorageOn = CCTK_QueryGroupStorage(cctkGH, - CCTK_GroupNameFromVarI(ConstrainedVariableIndex[var])); + StorageOn = CCTK_QueryGroupStorageI(cctkGH, + CCTK_GroupIndexFromVarI(ConstrainedVariableIndex[var])); if (StorageOn < 0) { @@ -369,8 +369,8 @@ void MoL_InitialCopy(CCTK_ARGUMENTS) for (var = 0; var < MoLNumConstrainedComplexVariables; var++) { - StorageOn = CCTK_QueryGroupStorage(cctkGH, - CCTK_GroupNameFromVarI(ConstrainedComplexVariableIndex[var])); + StorageOn = CCTK_QueryGroupStorageI(cctkGH, + CCTK_GroupIndexFromVarI(ConstrainedComplexVariableIndex[var])); if (StorageOn < 0) { @@ -452,8 +452,8 @@ void MoL_InitRHS(CCTK_ARGUMENTS) for (var = 0; var < MoLNumEvolvedVariables; var++) { - StorageOn = CCTK_QueryGroupStorage(cctkGH, - CCTK_GroupNameFromVarI(RHSVariableIndex[var])); + StorageOn = CCTK_QueryGroupStorageI(cctkGH, + CCTK_GroupIndexFromVarI(RHSVariableIndex[var])); if (StorageOn < 0) { @@ -534,8 +534,8 @@ void MoL_InitRHS(CCTK_ARGUMENTS) for (var = 0; var < MoLNumEvolvedComplexVariables; var++) { - StorageOn = CCTK_QueryGroupStorage(cctkGH, - CCTK_GroupNameFromVarI(RHSComplexVariableIndex[var])); + StorageOn = CCTK_QueryGroupStorageI(cctkGH, + CCTK_GroupIndexFromVarI(RHSComplexVariableIndex[var])); if (StorageOn < 0) { -- cgit v1.2.3