From e22a84783f5322facfb18f0bfff0b8ed91eaafbc Mon Sep 17 00:00:00 2001
From: goodale <goodale@17b73243-c579-4c4c-a9d2-2d5706c11dac>
Date: Sat, 18 Sep 1999 18:13:56 +0000
Subject: 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
---
 src/include/cctk_FortranWrappers.h | 26 ++++++++++++++++++++++++++
 1 file changed, 26 insertions(+)
 create mode 100644 src/include/cctk_FortranWrappers.h

(limited to 'src/include/cctk_FortranWrappers.h')

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
+
-- 
cgit v1.2.3