-Protected_scm::Protected_scm (Protected_scm const &s)
-{
- object_ = (SCM_NIMP (s.object_) ? scm_gc_protect_object (s.object_)
- : s.object_);
-}
+// For static objects, this will be called at program exit. With the
+// state of the memory system unknown, we refrain from any cleanup
+// actions outside of the object memory itself.