Mercurial > pub > dyncall > dyncall

comparison test/call_suite/globals.c @ 515:c9c546f8598b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
- added _Bool type to call_suite* tests
author Tassilo Philipp
date Sun, 10 Apr 2022 21:05:33 +0200
parents e3bf15207d93
children
comparison
equal deleted inserted replaced
514:01f928eb9584 515:c9c546f8598b
38 int i; 38 int i;
39 #define X(CH,T) V_##CH = (T*) malloc(sizeof(T)*(G_maxargs+1)); K_##CH = (T*) malloc(sizeof(T)*(G_maxargs+1)); 39 #define X(CH,T) V_##CH = (T*) malloc(sizeof(T)*(G_maxargs+1)); K_##CH = (T*) malloc(sizeof(T)*(G_maxargs+1));
40 DEF_TYPES 40 DEF_TYPES
41 #undef X 41 #undef X
42 for(i=0;i<G_maxargs+1;++i) { 42 for(i=0;i<G_maxargs+1;++i) {
43 K_B[i] = (DCbool) ((int)rand_d() & 1);
43 K_c[i] = (char) (((rand_d()-0.5)*2) * (1<<7)); 44 K_c[i] = (char) (((rand_d()-0.5)*2) * (1<<7));
44 K_s[i] = (short) (((rand_d()-0.5)*2) * (1<<(sizeof(short)*8-1))); 45 K_s[i] = (short) (((rand_d()-0.5)*2) * (1<<(sizeof(short)*8-1)));
45 K_i[i] = (int) (((rand_d()-0.5)*2) * (1<<(sizeof(int)*8-2))); 46 K_i[i] = (int) (((rand_d()-0.5)*2) * (1<<(sizeof(int)*8-2)));
46 K_j[i] = (long) (((rand_d()-0.5)*2) * (1L<<(sizeof(long)*8-2))); 47 K_j[i] = (long) (((rand_d()-0.5)*2) * (1L<<(sizeof(long)*8-2)));
47 K_l[i] = (long long) (((rand_d()-0.5)*2) * (1LL<<(sizeof(long long)*8-2))); 48 K_l[i] = (long long) (((rand_d()-0.5)*2) * (1LL<<(sizeof(long long)*8-2)));