X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=src%2Fscheme%2Ftest%2Fao_scheme_test.c;h=45068369e6faf49c7ceb8e6e02fd5b9240478c0e;hb=d8c9024f3829dc3f241b16869f165f3ee01764f3;hp=0c77d8d5bde46f3e092cb3b4deea07f95a592479;hpb=7517da1646fc30faaa9ee1c969cfa35ae1a17423;p=fw%2Faltos diff --git a/src/scheme/test/ao_scheme_test.c b/src/scheme/test/ao_scheme_test.c index 0c77d8d5..45068369 100644 --- a/src/scheme/test/ao_scheme_test.c +++ b/src/scheme/test/ao_scheme_test.c @@ -107,6 +107,7 @@ main (int argc, char **argv) } ao_scheme_read_eval_print(); +#ifdef DBG_MEM_STATS printf ("collects: full: %lu incremental %lu\n", ao_scheme_collects[AO_SCHEME_COLLECT_FULL], ao_scheme_collects[AO_SCHEME_COLLECT_INCREMENTAL]); @@ -136,4 +137,5 @@ main (int argc, char **argv) (double) ao_scheme_loops[AO_SCHEME_COLLECT_FULL], (double) ao_scheme_freed[AO_SCHEME_COLLECT_INCREMENTAL] / (double) ao_scheme_loops[AO_SCHEME_COLLECT_INCREMENTAL]); +#endif }