method init_window (w : GWindow.window) =
      gui#reparent w#coerce