Fcalva/cyclone
1
0
Fork 0
mirror of https://github.com/justinethier/cyclone.git synced 2025-07-10 22:37:38 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

New test file

Browse source
This commit is contained in:
Justin Ethier 2016-12-04 09:33:17 +00:00
parent a3cb0b1ab8
commit 5179f2261b
1 changed files with 23 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

23
tests/debug/test-sizes.c Normal file
View file

@ -0,0 +1,23 @@
#include "include/cyclone/types.h"
void main() {
printf("bytevector_type %d\n", sizeof(bytevector_type));
printf("c_opaque_type %d\n", sizeof(c_opaque_type));
printf("closure0_type %d\n", sizeof(closure0_type));
printf("closure1_type %d\n", sizeof(closure1_type));
printf("closureN_type %d\n", sizeof(closureN_type));
printf("cond_var_type %d\n", sizeof(cond_var_type));
printf("cvar_type %d\n", sizeof(cvar_type ));
printf("double_type %d\n", sizeof(double_type ));
// printf("eof_type %d\n", sizeof(eof_type ));
// printf("forward_type %d\n", sizeof(forward_type ));
printf("integer_type %d\n", sizeof(integer_type ));
printf("macro_type %d\n", sizeof(macro_type ));
printf("mutex_type %d\n", sizeof(mutex_type ));
printf("pair_type %d\n", sizeof(pair_type ));
printf("port_type %d\n", sizeof(port_type ));
printf("primitive_type %d\n", sizeof(primitive_type));
printf("string_type %d\n", sizeof(string_type ));
printf("symbol_type %d\n", sizeof(symbol_type ));
printf("vector_type %d\n", sizeof(vector_type ));
}