diff options
Diffstat (limited to 'src/ScalarBoundary.c')
-rw-r--r-- | src/ScalarBoundary.c | 13 |
1 files changed, 7 insertions, 6 deletions
diff --git a/src/ScalarBoundary.c b/src/ScalarBoundary.c index 59f1e8a..42dcedd 100644 --- a/src/ScalarBoundary.c +++ b/src/ScalarBoundary.c @@ -31,7 +31,7 @@ static const char *rcsid = "$Header$"; CCTK_FILEVERSION(CactusBase_Boundary_ScalarBoundary_c); static int ApplyBndScalar (const cGH *GH, - int stencil_dir, + CCTK_INT stencil_dir, const CCTK_INT *stencil_alldirs, int dir, CCTK_REAL scalar, @@ -158,7 +158,8 @@ CCTK_INT BndScalar(const cGH *GH, CCTK_INT num_vars, CCTK_INT *vars, CCTK_INT *f gdim = CCTK_GroupDimI(gi); if (gdim > max_gdim) { - width_alldirs = realloc(width_alldirs, 2*gdim*sizeof(CCTK_INT)); + width_alldirs = + (CCTK_INT *) realloc(width_alldirs, 2*gdim*sizeof(CCTK_INT)); max_gdim = gdim; } @@ -1052,7 +1053,7 @@ void CCTK_FCALL CCTK_FNAME (BndScalarVN) @endreturndesc @@*/ static int ApplyBndScalar (const cGH *GH, - int width_dir, + CCTK_INT width_dir, const CCTK_INT *in_widths, int dir, CCTK_REAL scalar, @@ -1062,8 +1063,8 @@ static int ApplyBndScalar (const cGH *GH, int i, j, k; int gindex, gdim; int var, timelvl; - int doBC[2*MAXDIM], dstag[MAXDIM], lsh[MAXDIM], lssh[MAXDIM], - widths[2*MAXDIM]; + int doBC[2*MAXDIM], dstag[MAXDIM], lsh[MAXDIM], lssh[MAXDIM]; + CCTK_INT widths[2*MAXDIM]; SymmetryGHex *sGHex; /* check the direction parameter */ @@ -1096,7 +1097,7 @@ static int ApplyBndScalar (const cGH *GH, } else if (in_widths) { - memcpy (widths, in_widths, 2* gdim * sizeof (int)); + memcpy (widths, in_widths, 2* gdim * sizeof (CCTK_INT)); } else { |