Mercurial > pub > dyncall > dyncall
comparison test/call_suite/cases.c @ 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/cases.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 "globals.h" | |
27 | |
28 #define ret_v(X) | |
29 #define ret_c(X) return(K_c[X]); | |
30 #define ret_s(X) return(K_s[X]); | |
31 #define ret_i(X) return(K_i[X]); | |
32 #define ret_j(X) return(K_j[X]); | |
33 #define ret_l(X) return(K_l[X]); | |
34 #define ret_p(X) return(K_p[X]); | |
35 #define ret_f(X) return(K_f[X]); | |
36 #define ret_d(X) return(K_d[X]); | |
37 extern int fid; | |
38 | |
39 #define v void | |
40 #define c char | |
41 #define s short | |
42 #define i int | |
43 #define j long | |
44 #define l long long | |
45 #define p void* | |
46 #define f float | |
47 #define d double | |
48 | |
49 #include "cases.h" | |
50 | |
51 int G_ncases = sizeof(G_sigtab)/sizeof(G_sigtab[0]); | |
52 |