11 lines
380 B
Clojure
11 lines
380 B
Clojure
(defn unimplemented [lang-name]
|
|
(let [title-set #(future (apply sorted-set (get-titles %)))
|
|
all-titles (title-set "Programming_Tasks")
|
|
lang-titles (title-set lang-name)]
|
|
(seq (set/difference @all-titles @lang-titles))))
|
|
|
|
(let [titles (unimplemented "Clojure")]
|
|
(doseq [title titles] (println title))
|
|
(println "count: " (count titles)))
|
|
(shutdown-agents)
|