From e4a3847a3cf04f59622b86f2780206ea1914f690 Mon Sep 17 00:00:00 2001 From: schnetter Date: Tue, 28 Oct 2003 13:48:24 +0000 Subject: Change the way in which pointers are passed to and from Fortran. git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/ADMAnalysis/trunk@26 80bd93c7-81bc-453a-9e3f-619c0b4f6fe4 --- interface.ccl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/interface.ccl b/interface.ccl index aeb7dba..1338f62 100644 --- a/interface.ccl +++ b/interface.ccl @@ -46,7 +46,7 @@ void FUNCTION Trace(CCTK_INT IN ARRAY lsh, \ PROVIDES FUNCTION CartToSphere WITH ADMAnalysis_CartToSphere LANGUAGE C PROVIDES FUNCTION Trace WITH ADMAnalysis_Trace LANGUAGE C -CCTK_INT FUNCTION Boundary_SelectGroupForBC(CCTK_POINTER IN GH, \ +CCTK_INT FUNCTION Boundary_SelectGroupForBC(CCTK_POINTER_TO_CONST IN GH, \ CCTK_INT IN faces, CCTK_INT IN boundary_width, CCTK_INT IN table_handle, \ CCTK_STRING IN group_name, CCTK_STRING IN bc_name) USES FUNCTION Boundary_SelectGroupForBC -- cgit v1.2.3