diff options
| author | schnetter <schnetter@51d2df92-0e4f-0410-a727-bd43d766d6b6> | 2004-06-11 13:59:19 +0000 |
|---|---|---|
| committer | schnetter <schnetter@51d2df92-0e4f-0410-a727-bd43d766d6b6> | 2004-06-11 13:59:19 +0000 |
| commit | 116fb5de4df006dd0621e99a8ac8936e71fe1fb1 (patch) | |
| tree | 0bc4ff021e4a02144faac79a9b65df667cfd0dd2 | |
| parent | 83035a1c09d352eb92be8232dc146cdeab98a157 (diff) | |
Give the interface for CCTK_TotalMemory only once.
git-svn-id: http://svn.cactuscode.org/arrangements/CactusBase/Fortran/trunk@12 51d2df92-0e4f-0410-a727-bd43d766d6b6
| -rw-r--r-- | src/cctk_MemAlloc.F90 | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/src/cctk_MemAlloc.F90 b/src/cctk_MemAlloc.F90 index eec8e04..e0a1c79 100644 --- a/src/cctk_MemAlloc.F90 +++ b/src/cctk_MemAlloc.F90 @@ -29,11 +29,8 @@ module cctk_MemAlloc CCTK_POINTER ptr end subroutine CCTK_Free - subroutine CCTK_TotalMemory (size) - implicit none - integer size - end subroutine CCTK_TotalMemory - + ! CCTK_TotalMemory is already declared in cctk_Malloc1 + end interface end module cctk_MemAlloc |