get-top-level-window in editor:basic<%>

Returns the top-level-window<%> currently associated with this buffer.

This does not work for embedded editors.

• (send an-editor:basic get-top-level-window) -> (union #f (implements top-level-window<%>))