lisp: sys_cost for memory footprint

2026-02-11 07:56:57 +00:00
parent ff512986f8
commit 8b2fe97fc2
2 changed files with 8 additions and 0 deletions
--- a/include/alisp/lisp.h
+++ b/include/alisp/lisp.h
@@ -34,6 +34,9 @@ void sys_init(sys_t *);
 void sys_register(sys_t *, lisp_t *);
 void sys_free(sys_t *);

+// Debugging function: provides total memory usage from system.
+u64 sys_cost(sys_t *);
+
 /// Constructors and destructors
 lisp_t *make_int(i64);
 lisp_t *make_vec(sys_t *, u64);