なぜAlephのHTTPサーバーは何もしませんか？

Question

ClojureのAlephライブラリを使用して比較的単純なHTTPサーバーを作成しました。非常に複雑ではありません：

(ns cxpond.xmlrpc.core 
    (:gen-class) 
    (:require [aleph.http :as http])) 

(defn handler [req] 
    {:status 200 
    :headers {"Content-Type" "text/plain"} 
    :body "HELLO, WORLD!"}) 

(defn -main [& args] 
    (http/start-server service/handler {:port 8005})) 

明らかに、それはかなりシンプルであり、Alephの文書で与えられた例にかなり近似しています。それはうまくコンパイルされますが、実行すると（lein runを介して）それだけで何もしません。プログラムはすぐに終了します。明らかにそれはポート8005またはそのような何でも聞いていない。私はここで何が欠けていますか？明らかに、Alephでサーバーを起動するために必要なことが他にもあるはずです。

Answer 1

http/start-serverはブロックしません。ただオブジェクトを返すので、-mainの実行を終了するだけでプログラムは終了します。

私はalephを使用せず、明白なjoin-likeパターンは見ません。 1つのライフサイクル管理を行う必要があるかのように見え、start-serverから返されたオブジェクトに対して.closeを呼び出し、正常にシャットダウンします。

Answer 2

'start-server'によって返された値の 'aleph.netty/wait-for-close'を呼び出すと、サーバーが閉じられるまでブロックされます。