Mercurial > pub > dyncall > dyncall
comparison 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 |
comparison
equal
deleted
inserted
replaced
-1:000000000000 | 0:3e629dc19168 |
---|---|
1 /* | |
2 | |
3 Package: dyncall | |
4 Library: test | |
5 File: test/call_suite/globals.h | |
6 Description: | |
7 License: | |
8 | |
9 Copyright (c) 2011-2015 Daniel Adler <dadler@uni-goettingen.de>, | |
10 Tassilo Philipp <tphilipp@potion-studios.com> | |
11 | |
12 Permission to use, copy, modify, and distribute this software for any | |
13 purpose with or without fee is hereby granted, provided that the above | |
14 copyright notice and this permission notice appear in all copies. | |
15 | |
16 THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES | |
17 WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF | |
18 MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR | |
19 ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES | |
20 WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN | |
21 ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF | |
22 OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. | |
23 | |
24 */ | |
25 | |
26 | |
27 #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') | |
28 | |
29 #define X(CH,T,QCH) extern T *K_##CH; extern T *V_##CH; | |
30 DEF_TYPES | |
31 #undef X | |
32 | |
33 typedef void (*funptr)(); | |
34 | |
35 extern void * G_callvm; | |
36 extern funptr G_funtab[]; | |
37 extern char const * G_sigtab[]; | |
38 extern int G_ncases; | |
39 extern int G_maxargs; | |
40 | |
41 void init_K(); | |
42 void init_T(); | |
43 void clear_V(); | |
44 int invoke(char const* signature, void* target); | |
45 | |
46 #if 0 | |
47 extern const char *K_c; | |
48 extern const short *K_s; | |
49 extern const int *K_i; | |
50 extern const long *K_j; | |
51 extern const long long *K_l; | |
52 extern void* const *K_p; | |
53 extern const float *K_f; | |
54 extern const double *K_d; | |
55 | |
56 extern char *V_c; | |
57 extern short *V_s; | |
58 extern int *V_i; | |
59 extern long *V_j; | |
60 extern long long *V_l; | |
61 extern void* *V_p; | |
62 extern float *V_f; | |
63 extern double *V_d; | |
64 #endif | |
65 |