(defun (setf pointer-value) (value pointer heap) (file-position (heap-stream heap) pointer) (write-unsigned-bytes value (cell-buffer heap) (heap-stream heap) +pointer-size+) value)