adding a lot of helpers (with some debug stuff too) in alloc.lisp