diff options
| author | jthorn <jthorn@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 2005-05-11 10:44:12 +0000 |
|---|---|---|
| committer | jthorn <jthorn@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 2005-05-11 10:44:12 +0000 |
| commit | 5c257082950b7141aca791e84004db49d0e18889 (patch) | |
| tree | d3753914bbfeb72a8175cf7f8d7d75e2e93fe8ee /src/include/cctk_WarnLevel.h | |
| parent | 80eb5b1bb5f9c8f85fd23741446d393845eaaa79 (diff) | |
make CCTK_WARN_* #defines visible to Fortran code, as per
http://cactus.cct.lsu.edu/pipermail/developers/2005-May/000920.html
http://cactus.cct.lsu.edu/pipermail/developers/2005-May/000938.html
git-svn-id: http://svn.cactuscode.org/flesh/trunk@4044 17b73243-c579-4c4c-a9d2-2d5706c11dac
Diffstat (limited to 'src/include/cctk_WarnLevel.h')
| -rw-r--r-- | src/include/cctk_WarnLevel.h | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/src/include/cctk_WarnLevel.h b/src/include/cctk_WarnLevel.h index a0eaeaa7..a9956e3e 100644 --- a/src/include/cctk_WarnLevel.h +++ b/src/include/cctk_WarnLevel.h @@ -11,6 +11,8 @@ #ifndef _CCTK_WARNLEVEL_H_ #define _CCTK_WARNLEVEL_H_ +#ifdef CCODE + #ifdef __cplusplus extern "C" { @@ -49,6 +51,8 @@ __attribute__ ((format (printf, 2, 3))) } #endif +#endif /* CCODE */ + /* suggested values for warning levels (courtesy of Steve, PR#1742) */ #define CCTK_WARN_ABORT 0 /* abort the Cactus run */ #define CCTK_WARN_ALERT 1 /* the results of this run will be wrong, */ @@ -63,4 +67,4 @@ __attribute__ ((format (printf, 2, 3))) #define CCTK_WARN_DEBUG 4 /* these messages are probably useful */ /* only for debugging purposes */ -#endif +#endif /* ! _CCTK_WARNLEVEL_H_ */ |