




 
The generic function 
com-object-initialize
 is called by the built-in class 
standard-i-unknown
 at the point where the first COM interface pointer is made for the object. Prior to this, the object is known only to Lisp and is not involved in any COM operations. The built-in primary method specializing on 
standard-i-unknown
 does nothing.
(defmethod com-object-initialize :after
((my-doc doc-impl))
(ensure-open-document-file my-doc))