diff options
| author | allen <allen@6a38eb6e-646e-4a02-a296-d141613ad6c4> | 1999-09-14 11:33:21 +0000 |
|---|---|---|
| committer | allen <allen@6a38eb6e-646e-4a02-a296-d141613ad6c4> | 1999-09-14 11:33:21 +0000 |
| commit | 6409e2e59f9758e1c5fa723880fe69aa8fefd721 (patch) | |
| tree | ad44dbe5f96f0992aae268935c2e1ed02e352928 /src/FlatBoundary.c | |
| parent | 6e8332ff75aff851af0bb744d75349b314fe184e (diff) | |
Some little pointer-like bugs in return values
git-svn-id: http://svn.cactuscode.org/arrangements/CactusBase/Boundary/trunk@24 6a38eb6e-646e-4a02-a296-d141613ad6c4
Diffstat (limited to 'src/FlatBoundary.c')
| -rw-r--r-- | src/FlatBoundary.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/FlatBoundary.c b/src/FlatBoundary.c index 311c943..bc7d87f 100644 --- a/src/FlatBoundary.c +++ b/src/FlatBoundary.c @@ -159,10 +159,10 @@ int ApplyFlatBC(cGH *GH, int *stencil_size, char *name) { } -void FMODIFIER FORTRAN_NAME(ApplyFlatBC)(int retval, cGH *GH, int *stencil_size, ONE_FORTSTRING_ARG) { +void FMODIFIER FORTRAN_NAME(ApplyFlatBC)(int *retval, cGH *GH, int *stencil_size, ONE_FORTSTRING_ARG) { ONE_FORTSTRING_CREATE(name) - retval = ApplyFlatBC(GH,stencil_size,name); + *retval = ApplyFlatBC(GH,stencil_size,name); free(name); } |