(defgeneric initialize-block (block block-size heap)
;; This is used by mark and sweep collectors to write something into
;; the block that distinguishes free blocks from occupied blocks.
(:method (block block-size (heap free-list-heap))
;; Default: do nothing
(declare (ignore block-size))
block))
Source Context