Mercurial > pub > dyncall > dyncall
comparison test/hacking-mips/prolog.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/hacking-mips/prolog.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 #define DEF_CALL1(RT) \ | |
27 typedef RT (*f_##RT) (i,i,i,i,i,i,i,i); \ | |
28 RT call_##RT(void* target,void* regdata, int* data, int size) \ | |
29 { \ | |
30 f_##RT f = (f_##RT) target; \ | |
31 return f(data[0],data[1],data[2],data[3],data[4],data[5],data[6],data[7]); \ | |
32 } | |
33 | |
34 #define DEF_CALL(RT) \ | |
35 typedef RT (*f_##RT) (i,i,i,i,i,i,i,i); \ | |
36 RT call_##RT(void* target,void* regdata, int* data, int size) \ | |
37 { \ | |
38 f_##RT f = (f_##RT) target; \ | |
39 return f(); \ | |
40 } | |
41 | |
42 typedef long long llong; | |
43 typedef long double ldouble; | |
44 | |
45 DEF_CALL(int) | |
46 DEF_CALL(float) | |
47 DEF_CALL(double) | |
48 DEF_CALL(llong) | |
49 DEF_CALL(ldouble) | |
50 DEF_CALL(void) | |
51 |