Mercurial > pub > dyncall > dyncall
diff test/suite_aggrs/globals.c @ 438:b4ddad459690
suite_aggr;
- made generator produce unique signatures
- reduced dcNewStruct() calls to once only per sig
- added missing free()s
- cleanup: removal of unused decl, func renaming for clarity, static for tu-local symbols, ...
author | Tassilo Philipp |
---|---|
date | Wed, 26 Jan 2022 13:37:19 +0100 |
parents | 167faab0c0be |
children | 252f32fa59d8 |
line wrap: on
line diff
--- a/test/suite_aggrs/globals.c Wed Jan 26 13:26:39 2022 +0100 +++ b/test/suite_aggrs/globals.c Wed Jan 26 13:37:19 2022 +0100 @@ -42,7 +42,7 @@ return s; } -void init_K() +void init_test_data() { int i; int maxaggrsize = calc_max_aggr_size(); @@ -50,7 +50,6 @@ DEF_TYPES #undef X - for(i=0;i<G_maxargs+1;++i) { K_c[i] = (char) (((rand_d()-0.5)*2) * (1<<7)); K_s[i] = (short) (((rand_d()-0.5)*2) * (1<<(sizeof(short)*8-1))); @@ -59,7 +58,7 @@ K_l[i] = (long long) (((rand_d()-0.5)*2) * (1LL<<(sizeof(long long)*8-2))); K_p[i] = (void*) (long) (((rand_d()-0.5)*2) * (1LL<<(sizeof(void*)*8-1))); K_f[i] = (float) (rand_d() * FLT_MAX); - K_d[i] = (double) (((rand_d()-0.5)*2) * 1.7976931348623157E+308/*__DBL_MAX__*/); /* Plan9 doesn't know the macro. */ + K_d[i] = (double) (((rand_d()-0.5)*2) * 1.7976931348623157E+308/*__DBL_MAX__*/); /* Plan9 doesn't know the macro. */ K_a[i] = malloc(maxaggrsize); rand_mem(K_a[i], maxaggrsize); } } @@ -72,7 +71,7 @@ int i; for(i=0;i<G_maxargs+1;++i) { if(aggr_init) - free(V_a[i]); + free(V_a[i]); #define X(CH,T) V_##CH[i] = (T) 0; DEF_TYPES #undef X @@ -81,3 +80,16 @@ aggr_init = 1; } +void deinit_test_data() +{ + int i; + for(i=0;i<G_maxargs+1;++i) { + free(V_a[i]); + free(K_a[i]); + } + +#define X(CH,T) free(V_##CH); free(K_##CH); +DEF_TYPES +#undef X +} +