altos/scheme: Support scheme subsetting via feature settings

[fw/altos] / src / scheme / test / ao_scheme_test.c

diff --git a/src/scheme/test/ao_scheme_test.c b/src/scheme/test/ao_scheme_test.c
index 686e7169f47f33a4bbfcf5c29dbff17fba4ffcd5..45068369e6faf49c7ceb8e6e02fd5b9240478c0e 100644 (file)
--- a/src/scheme/test/ao_scheme_test.c
+++ b/src/scheme/test/ao_scheme_test.c
@@ -107,15 +107,16 @@ main (int argc, char **argv)
        }
        ao_scheme_read_eval_print();
 
-       printf ("collects: full: %d incremental %d\n",
+#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]);
 
-       printf ("freed: full %d incremental %d\n",
+       printf ("freed: full %lu incremental %lu\n",
                ao_scheme_freed[AO_SCHEME_COLLECT_FULL],
                ao_scheme_freed[AO_SCHEME_COLLECT_INCREMENTAL]);
 
-       printf("loops: full %d incremental %d\n",
+       printf("loops: full %lu incremental %lu\n",
                ao_scheme_loops[AO_SCHEME_COLLECT_FULL],
                ao_scheme_loops[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
 }