Clojure swing应用程序启动时间

我刚刚开始使用clojure和seesaw制作GUI应用程序。它只需要创建一个JFrame和几个组件。这是代码。主函数只调用start-gui，并在返回后立即退出。

(ns pause.gui
  (:use seesaw.core))
(native!)
; (javax.swing.UIManager/setLookAndFeel
;   "org.pushingpixels.substance.api.skin.SubstanceGraphiteLookAndFeel")
(def main-window
  (frame :title    "Pause"
         :on-close :exit))
(def sidebar (listbox :model []))
(def main-area (text :multi-line? true
                     :font "MONOSPACED-PLAIN-14"
                     :text "test"))
(def main-split
  (left-right-split (scrollable sidebar)
                    (scrollable main-area)
                    :divider-location 1/5))
(defn setup-main-window
  "Fills the main window with its content"
  [main-window]
  (config! main-window
           :content main-split)
  main-window)
(defn start-gui
  "Create the main window"
  []
  (-> main-window
      setup-main-window
      pack!
      show!))

我使用lein uberjar编译了它，并使用time java -jar对它进行了计时。报告时长14.5秒。我做错什么了吗？我可以接受3秒钟的启动，但这是完全不能接受的。