Returns the amount of work that needs to be done (i.e. octets that must be 'collected') before the current garbage collection has finished.
(defmethod work-left ((heap mark-and-sweep-heap))
"Returns the amount of work that needs to be done (i.e. octets that must be
'collected') before the current garbage collection has finished."
(- (max-work heap) (work-done heap)))
Source Context