Added functions to register thorns.

Tom


git-svn-id: http://svn.cactuscode.org/flesh/trunk@50 17b73243-c579-4c4c-a9d2-2d5706c11dac

1 files changed, 75 insertions, 0 deletions

diff --git a/src/main/InitialiseDataStructures.c b/src/main/InitialiseDataStructures.c
new file mode 100644
index 00000000..49716d9b
--- /dev/null
+++ b/src/main/InitialiseDataStructures.c
@@ -0,0 +1,75 @@
+ /*@@
+   @file      InitialiseDataStructures.c
+   @date      Wed Jan 13 20:28:08 1999
+   @author    Tom Goodale
+   @desc 
+   
+   @enddesc 
+ @@*/
+
+#include <stdio.h>
+
+#include "flesh.h"
+
+
+#define TEST_THORNREGISTRATION
+#ifdef TEST_THORNREGISTRATION
+
+int test_param_init();
+int test_param_set(const char *, const char *);
+int test_param_get(const char *, void **);
+int test_private_group_setup(cGH *);
+int test_protected_group_setup(cGH *);
+int test_public_group_setup(cGH *);
+
+
+static t_thorndata thorndata[] = {"test", "test", test_param_init, test_param_set, test_param_get, test_private_group_setup, test_protected_group_setup, test_public_group_setup};
+
+static int n_thorns=1;
+
+#else
+
+#include "thorndata.h"
+
+#endif
+
+static char *rcsid = "$Id$";
+
+int InitialiseDataStructures(tFleshConfig *ConfigData)
+{
+  int i;
+
+  for(i=0; i < n_thorns; i++)
+  {
+    CCTK_RegisterThorn(thorndata[i].name, thorndata[i].implementation,
+		       &(thorndata[i]));
+  }
+
+  return 0;
+}
+
+#ifdef TEST_THORNREGISTRATION
+
+int test_param_init()
+{
+}
+
+int test_param_set(const char *param, const char *value)
+{
+}
+int test_param_get(const char *name, void **value)
+{
+}
+int test_private_group_setup(cGH *GH)
+{
+}
+int test_protected_group_setup(cGH *GH)
+{
+}
+int test_public_group_setup(cGH *GH)
+{
+}
+
+
+#endif
+