Mercurial > pub > dyncall > dyncall
comparison dyncallback/dyncall_args_ppc32.c @ 236:9bca9ca46db9
- dyncallback 'long long' arg fix for Darwin/PPC
author | Tassilo Philipp |
---|---|
date | Tue, 02 May 2017 02:52:56 +0200 |
parents | 3e629dc19168 |
children | f5577f6bf97a |
comparison
equal
deleted
inserted
replaced
235:df556fd8ea37 | 236:9bca9ca46db9 |
---|---|
4 Library: dyncallback | 4 Library: dyncallback |
5 File: dyncallback/dyncall_args_ppc32.c | 5 File: dyncallback/dyncall_args_ppc32.c |
6 Description: Callback's Arguments VM - Implementation for ppc32 | 6 Description: Callback's Arguments VM - Implementation for ppc32 |
7 License: | 7 License: |
8 | 8 |
9 Copyright (c) 2007-2015 Daniel Adler <dadler@uni-goettingen.de>, | 9 Copyright (c) 2007-2017 Daniel Adler <dadler@uni-goettingen.de>, |
10 Tassilo Philipp <tphilipp@potion-studios.com> | 10 Tassilo Philipp <tphilipp@potion-studios.com> |
11 | 11 |
12 Permission to use, copy, modify, and distribute this software for any | 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 | 13 purpose with or without fee is hereby granted, provided that the above |
14 copyright notice and this permission notice appear in all copies. | 14 copyright notice and this permission notice appear in all copies. |
39 DCuint dcbArgUInt (DCArgs* p) { return (DCuint) dcbArgInt(p); } | 39 DCuint dcbArgUInt (DCArgs* p) { return (DCuint) dcbArgInt(p); } |
40 | 40 |
41 DCulonglong dcbArgULongLong (DCArgs* p) | 41 DCulonglong dcbArgULongLong (DCArgs* p) |
42 { | 42 { |
43 DCulonglong value; | 43 DCulonglong value; |
44 value = ( (DCulonglong) dcbArgUInt(p) ) << 16UL; | 44 value = ( (DCulonglong) dcbArgUInt(p) ) << 32UL; |
45 value |= dcbArgUInt(p); | 45 value |= dcbArgUInt(p); |
46 return value; | 46 return value; |
47 } | 47 } |
48 DClonglong dcbArgLongLong(DCArgs* p) { return (DClonglong)dcbArgULongLong(p); } | 48 DClonglong dcbArgLongLong(DCArgs* p) { return (DClonglong)dcbArgULongLong(p); } |
49 | 49 |