diff options
| author | hawke <hawke@578cdeb0-5ea1-4b81-8215-5a3b8777ee0b> | 2003-05-24 14:34:37 +0000 |
|---|---|---|
| committer | hawke <hawke@578cdeb0-5ea1-4b81-8215-5a3b8777ee0b> | 2003-05-24 14:34:37 +0000 |
| commit | 627caa6bdf1e4b6db96a799454303d8b2e7935fe (patch) | |
| tree | 1664fad214476385f5c296f081ee13bb2b8db58b /src/Registration.c | |
| parent | f3a2829b5b32b6fad8383ac16c16ac6c2f58b696 (diff) | |
Comment or ifdef out complex variable support as Carpet doesn't like it.
To use the complex variable stuff right now you need to uncomment the appropriate groups in the interface.ccl and #def MOLDOESCOMPLEX in the appropriate files. It still probably won't work.
git-svn-id: http://svn.cactuscode.org/arrangements/CactusNumerical/MoL/trunk@13 578cdeb0-5ea1-4b81-8215-5a3b8777ee0b
Diffstat (limited to 'src/Registration.c')
| -rw-r--r-- | src/Registration.c | 40 |
1 files changed, 38 insertions, 2 deletions
diff --git a/src/Registration.c b/src/Registration.c index 71c98ee..13d5d12 100644 --- a/src/Registration.c +++ b/src/Registration.c @@ -1113,7 +1113,11 @@ CCTK_INT MoL_RegisterEvolvedComplex(CCTK_INT EvolvedIndex, CCTK_INT RHSIndex) DECLARE_CCTK_PARAMETERS; - CCTK_INT /* ierr, */ index, varused, numtimelevs1, numtimelevs2; + /* FIXME */ + +#ifdef MOLDOESCOMPLEX + + CCTK_INT index, varused, numtimelevs1, numtimelevs2; #ifdef MOLDEBUG printf("Arrived in MoLRegisterEvolvedComplex \n"); @@ -1240,6 +1244,8 @@ CCTK_INT MoL_RegisterEvolvedComplex(CCTK_INT EvolvedIndex, CCTK_INT RHSIndex) MoLNumSandRComplexVariables--; } +#endif /* FIXME */ + return 0; } @@ -1249,6 +1255,10 @@ CCTK_INT MoL_RegisterConstrainedComplex(CCTK_INT ConstrainedIndex) DECLARE_CCTK_PARAMETERS; + /* FIXME */ + +#ifdef MOLDOESCOMPLEX + CCTK_INT numtimelevs, varused, evolved, index; if (!(CCTK_GroupTypeFromVarI(ConstrainedIndex)==CCTK_GF)) @@ -1328,6 +1338,8 @@ CCTK_INT MoL_RegisterConstrainedComplex(CCTK_INT ConstrainedIndex) } +#endif /* FIXME */ + return 0; } @@ -1337,6 +1349,10 @@ CCTK_INT MoL_RegisterSaveAndRestoreComplex(CCTK_INT SandRIndex) DECLARE_CCTK_PARAMETERS; + /* FIXME */ + +#ifdef MOLDOESCOMPLEX + CCTK_INT numtimelevs, varused, evolved; if (!(CCTK_GroupTypeFromVarI(SandRIndex)==CCTK_GF)) @@ -1404,6 +1420,8 @@ CCTK_INT MoL_RegisterSaveAndRestoreComplex(CCTK_INT SandRIndex) } +#endif /* FIXME */ + return 0; } @@ -1912,7 +1930,11 @@ CCTK_INT MoL_RegisterEvolvedComplexArray(CCTK_INT EvolvedIndex, DECLARE_CCTK_PARAMETERS; - CCTK_INT /* ierr, */ index, varused, numtimelevs1, numtimelevs2; + /* FIXME */ + +#ifdef MOLDOESCOMPLEX + + CCTK_INT index, varused, numtimelevs1, numtimelevs2; #ifdef MOLDEBUG printf("Arrived in MoLRegisterEvolvedComplexArray \n"); @@ -2033,6 +2055,8 @@ CCTK_INT MoL_RegisterEvolvedComplexArray(CCTK_INT EvolvedIndex, MoLNumSandRComplexArrayVariables--; } +#endif /* FIXME */ + return 0; } @@ -2042,6 +2066,10 @@ CCTK_INT MoL_RegisterConstrainedComplexArray(CCTK_INT ConstrainedIndex) DECLARE_CCTK_PARAMETERS; + /* FIXME */ + +#ifdef MOLDOESCOMPLEX + CCTK_INT numtimelevs, varused, evolved, index; if (!(CCTK_GroupTypeFromVarI(ConstrainedIndex)==CCTK_ARRAY)) @@ -2121,6 +2149,8 @@ CCTK_INT MoL_RegisterConstrainedComplexArray(CCTK_INT ConstrainedIndex) } +#endif + return 0; } @@ -2130,6 +2160,10 @@ CCTK_INT MoL_RegisterSaveAndRestoreComplexArray(CCTK_INT SandRIndex) DECLARE_CCTK_PARAMETERS; + /* FIXME */ + +#ifdef MOLDOESCOMPLEX + CCTK_INT numtimelevs, varused, evolved; if (!(CCTK_GroupTypeFromVarI(SandRIndex)==CCTK_ARRAY)) @@ -2197,6 +2231,8 @@ CCTK_INT MoL_RegisterSaveAndRestoreComplexArray(CCTK_INT SandRIndex) } +#endif + return 0; } |