|
0
|
1 /*
|
|
|
2
|
|
|
3 Package: dyncall
|
|
|
4 Library: test
|
|
|
5 File: test/call_suite/main.c
|
|
|
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 #include "dyncall.h"
|
|
|
27 #include "globals.h"
|
|
|
28 #include <string.h>
|
|
|
29 #include "../common/platformInit.h"
|
|
|
30 #include "../common/platformInit.c" /* Impl. for functions only used in this translation unit */
|
|
|
31
|
|
|
32
|
|
|
33 char linebuf[1024];
|
|
|
34 void* G_callvm;
|
|
|
35
|
|
|
36 int run_test(int i) {
|
|
|
37 char const * sig;
|
|
|
38 void * target;
|
|
|
39 int success;
|
|
|
40 sig = G_sigtab[i];
|
|
|
41 target = (void*) G_funtab[i];
|
|
|
42 printf("%d:%s:",i,sig);
|
|
|
43 success = invoke(sig,target);
|
|
|
44 printf("%d\n",success);
|
|
|
45 return success;
|
|
|
46 }
|
|
|
47
|
|
|
48 int run_all() {
|
|
|
49 int i;
|
|
|
50 int failure = 0;
|
|
|
51 for(i=0;i<G_ncases;++i) {
|
|
|
52 failure |= !( run_test(i) );
|
|
|
53 }
|
|
|
54 return !failure;
|
|
|
55 }
|
|
|
56
|
|
|
57 int main(int argc, char* argv[])
|
|
|
58 {
|
|
|
59 int total;
|
|
|
60
|
|
|
61 dcTest_initPlatform();
|
|
|
62
|
|
|
63 init_K(G_maxargs);
|
|
|
64 G_callvm = (DCCallVM*) dcNewCallVM(4096);
|
|
|
65 dcReset(G_callvm);
|
|
|
66 total = run_all();
|
|
|
67 printf("result: call_suite: %d\n", total);
|
|
|
68
|
|
|
69 dcTest_deInitPlatform();
|
|
|
70
|
|
|
71 return 0;
|
|
|
72 }
|
|
|
73
|
