diff test/call_suite/globals.h @ 0:3e629dc19168

initial from svn dyncall-1745
author Daniel Adler
date Thu, 19 Mar 2015 22:24:28 +0100
parents
children f5577f6bf97a
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/test/call_suite/globals.h	Thu Mar 19 22:24:28 2015 +0100
@@ -0,0 +1,65 @@
+/*
+
+ Package: dyncall
+ Library: test
+ File: test/call_suite/globals.h
+ Description: 
+ License:
+
+   Copyright (c) 2011-2015 Daniel Adler <dadler@uni-goettingen.de>,
+                           Tassilo Philipp <tphilipp@potion-studios.com>
+
+   Permission to use, copy, modify, and distribute this software for any
+   purpose with or without fee is hereby granted, provided that the above
+   copyright notice and this permission notice appear in all copies.
+
+   THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
+   WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
+   MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
+   ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
+   WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
+   ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
+   OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
+
+*/
+
+
+#define DEF_TYPES X(c,char,'c') X(s,short,'s') X(i,int,'i') X(j,long,'j') X(l,long long,'l') X(p,void*,'p') X(f,float,'f') X(d,double,'d')
+
+#define X(CH,T,QCH) extern T *K_##CH; extern T *V_##CH;
+DEF_TYPES
+#undef X
+
+typedef void (*funptr)();
+
+extern void       * G_callvm;
+extern funptr       G_funtab[];
+extern char const * G_sigtab[];
+extern int          G_ncases;
+extern int          G_maxargs;
+
+void init_K();
+void init_T();
+void clear_V();
+int  invoke(char const* signature, void* target);
+
+#if 0
+extern const char      *K_c;
+extern const short     *K_s;
+extern const int       *K_i;
+extern const long      *K_j;
+extern const long long *K_l;
+extern void* const     *K_p;
+extern const float     *K_f;
+extern const double    *K_d;
+
+extern char      *V_c;
+extern short     *V_s;
+extern int       *V_i;
+extern long      *V_j;
+extern long long *V_l;
+extern void*     *V_p;
+extern float     *V_f;
+extern double    *V_d;
+#endif 
+