            [com.badlogic.gdx.scenes.scene2d Actor Stage]
            [com.badlogic.gdx.scenes.scene2d.ui ButtonGroup CheckBox Dialog
             HorizontalGroup Image ImageButton ImageTextButton Label ScrollPane
-            SelectBox Skin Slider Table TextButton TextField VerticalGroup
-            WidgetGroup Window]
+            SelectBox Skin Slider Table TextButton TextField Tree Tree$Node
+            VerticalGroup WidgetGroup Window]
            [com.badlogic.gdx.scenes.scene2d.utils ActorGestureListener Align
             ChangeListener ClickListener DragListener FocusListener
             NinePatchDrawable SpriteDrawable TextureRegionDrawable

  [entity k & options]
  `(u/call! ^TextField (:object ~entity) ~k ~@options))

(defn vertical*
  [children]
  (create-group (VerticalGroup.) children))

  `(u/call! ^VerticalGroup (:object ~entity) ~k ~@options))

(defn window*
  [children ^String title arg]
  (create-group (Window. title arg) children))

(defmacro window
  [children title arg & options]
  `(let [entity# (window* ~children ~title ~arg)]
     (u/calls! ^Window (:object entity#) ~@options)
     entity#))

