在Mac OS X上使用Clojure不會出現窗口

Question

我正在研究“ Clojure的喜悅”，並進入了有關在窗口中顯示一些圖形的部分。 我與REPL的互動如下。 根據書，這應該使一個小窗口出現。 沒有出現窗口。

我正在運行Mac OS X Mavericks。

nREPL server started on port 54014 on host 127.0.0.1 - nrepl://127.0.0.1:54014
REPL-y 0.3.1
Clojure 1.6.0
    Docs: (doc function-name-here)
          (find-doc "part-of-name-here")
  Source: (source function-name-here)
 Javadoc: (javadoc java-object-or-class-here)
    Exit: Control+D or (exit) or (quit)
 Results: Stored in vars *1, *2, *3, an exception in *e

user=> (def frame (java.awt.Frame.))
#'user/frame
user=> (.setVisible frame true)
nil
user=> (.setSize frame (java.awt.Dimension. 200 200))
nil
user=> frame
#<Frame java.awt.Frame[frame0,0,22,200x200,layout=java.awt.BorderLayout,title=,resizable,normal]>
user=>

Answer 1

該框架會啟動，但是可能不會很明顯，因為在執行您指定的表單時它將是一個小的空白框架。

您應該增加框架的大小，然后繪制一些明顯的東西，例如：

(def frame (java.awt.Frame.))
(.setVisible frame true)
(.setSize frame (java.awt.Dimension. 400 400))
(def gfx (.getGraphics frame))
(.setColor gfx (java.awt.Color/GREEN))
(.fillOval gfx 100 100 200 300)
(.toFront frame)