                               spec)
                           demo-specs)
                   demo-specs)))
-    (println (str "babel demo is finished. JVM shutting down."))))
+    (println (str "babel demo is finished."))))
 
 (defn run-demo-with [n spec model]
   "print out _n_ generated sentences to stdout."

                        (println)
                        (println log-message)
                        (println)
                        (let [language-model (or (:lm spec) default-language-model)
                              expressions (run-demo-with n (dissoc spec :lm) language-model)]
                          (count (pmap (fn [expression]
                                         (let [formatted (fo expression :show-notes false)]

;; run each (generate) as (time (generate)):
(def ^:const timings? false)

(defn demo [ & [n spec]]
  (let [demo-specs
        [{:demo "Dog noun phrases"
