diff options
author | goodale <goodale@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 1999-09-18 18:13:56 +0000 |
---|---|---|
committer | goodale <goodale@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 1999-09-18 18:13:56 +0000 |
commit | e22a84783f5322facfb18f0bfff0b8ed91eaafbc (patch) | |
tree | 449498dc5233c32d1d56ad40eac3be3ac6f75556 /src | |
parent | 31abe5aa5537c7f48a870fadb4c2aca8cdc6efd8 (diff) |
Header for routines to register and get Fortran Wrappers.
Tom
git-svn-id: http://svn.cactuscode.org/flesh/trunk@955 17b73243-c579-4c4c-a9d2-2d5706c11dac
Diffstat (limited to 'src')
-rw-r--r-- | src/include/cctk_FortranWrappers.h | 26 |
1 files changed, 26 insertions, 0 deletions
diff --git a/src/include/cctk_FortranWrappers.h b/src/include/cctk_FortranWrappers.h new file mode 100644 index 00000000..7ff11369 --- /dev/null +++ b/src/include/cctk_FortranWrappers.h @@ -0,0 +1,26 @@ + /*@@ + @header cctk_FortranWrappers.h + @date Sat Sep 18 00:52:35 1999 + @author Tom Goodale + @desc + Routines for dealing with Fortran wrappers + @enddesc + @@*/ + +#ifndef __CCTK_FORTRANWRAPPERS_H_ +#define __CCTK_FORTRANWRAPPERS_H_ + +#ifdef __cplusplus +extern "C" { +#endif + +int CCTK_RegisterFortranWrapper(const char *name, int (*function)(void *, void *)); + +int (*CCTK_FortranWrapper(const char *name))(void *, void *); + +#ifdef __cplusplus +} +#endif + +#endif + |