annotate lua/luadyncall/src/dyntype.c @ 62:4a9f6c7c09c1 default tip

- fix inccorect overflow errors for int (and long on LLP64 systems)
author Tassilo Philipp
date Sat, 18 May 2024 15:33:54 +0200
parents 0cfcc391201f
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
1 #include "dyncall.h"
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
2 #include "dyncall_signature.h"
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
3
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
4 size_t dtSize(const char* signature)
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
5 {
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
6 char ch = *signature;
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
7 switch(ch)
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
8 {
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
9 case DC_SIGCHAR_BOOL: return sizeof(DCbool);
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
10 case DC_SIGCHAR_CHAR: return sizeof(DCchar);
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
11 case DC_SIGCHAR_UCHAR: return sizeof(DCuchar);
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
12 case DC_SIGCHAR_SHORT: return sizeof(DCshort);
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
13 case DC_SIGCHAR_USHORT: return sizeof(DCushort);
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
14 case DC_SIGCHAR_INT: return sizeof(DCint);
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
15 case DC_SIGCHAR_UINT: return sizeof(DCuint);
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
16 case DC_SIGCHAR_LONG: return sizeof(DClong);
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
17 case DC_SIGCHAR_ULONG: return sizeof(DCulong);
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
18 case DC_SIGCHAR_LONGLONG: return sizeof(DClonglong);
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
19 case DC_SIGCHAR_ULONGLONG: return sizeof(DCulonglong);
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
20 case DC_SIGCHAR_FLOAT: return sizeof(DCfloat);
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
21 case DC_SIGCHAR_DOUBLE: return sizeof(DCdouble);
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
22 case DC_SIGCHAR_POINTER: return sizeof(DCpointer);
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
23 case DC_SIGCHAR_STRING: return sizeof(DCstring);
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
24 case DC_SIGCHAR_VOID: return sizeof(DCvoid);
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
25 default: return 0;
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
26 }
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
27 }
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
28
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
29 size_t dtAlign(const char* signature)
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
30 {
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
31 return dtSize(signature);
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
32 }
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
33
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
34