diff options
| author | Keith Packard <keithp@keithp.com> | 2017-12-10 16:50:06 -0800 |
|---|---|---|
| committer | Keith Packard <keithp@keithp.com> | 2017-12-11 12:20:25 -0800 |
| commit | 7517da1646fc30faaa9ee1c969cfa35ae1a17423 (patch) | |
| tree | c08a6bd2ca3cbdde2efdf891e949706faaf2aaaf /src/scheme/test/ao_scheme_test.c | |
| parent | 7e14e243565e814ddd524c8d09454719dc89c6d8 (diff) | |
altos/scheme: Use 64-bit ints to track memory allocation stats
These are only collected for debug purposes, but can get quite large
if the interpreter runs for a while.
Signed-off-by: Keith Packard <keithp@keithp.com>
Diffstat (limited to 'src/scheme/test/ao_scheme_test.c')
| -rw-r--r-- | src/scheme/test/ao_scheme_test.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/scheme/test/ao_scheme_test.c b/src/scheme/test/ao_scheme_test.c index 686e7169..0c77d8d5 100644 --- a/src/scheme/test/ao_scheme_test.c +++ b/src/scheme/test/ao_scheme_test.c @@ -107,15 +107,15 @@ main (int argc, char **argv) } ao_scheme_read_eval_print(); - printf ("collects: full: %d incremental %d\n", + 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]); |