This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
$ lein new hoplon my-project | |
java.lang.ClassCastException: clojure.lang.Symbol cannot be cast to clojure.lang.Associative | |
at clojure.lang.RT.assoc (RT.java:702) | |
clojure.core$assoc.invoke (core.clj:187) | |
ancient_clj.core$latest_version_BANG_.doInvoke (core.clj:139) | |
clojure.lang.RestFn.invoke (RestFn.java:423) | |
ancient_clj.core$latest_version_string_BANG_.doInvoke (core.clj:148) | |
clojure.lang.RestFn.applyTo (RestFn.java:139) | |
clojure.core$apply.invoke (core.clj:626) | |
clojure.core$partial$fn__4228.doInvoke (core.clj:2468) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
# -*- mode: ruby -*- | |
# vi: set ft=ruby : | |
$provscript = <<SCRIPT | |
apt-get update | |
apt-get -y install python-dev \ | |
libffi-dev \ | |
python-setuptools \ | |
python-pip | |
pip install python-ceilometerclient |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(ns bigobj.core | |
(:require-macros [bigobj.macros :as m])) | |
(def o1 (m/bigobj 10 3)) ;; Compiles successfully | |
(def o2 (m/bigobj 1 100)) ;; Compiles successfully | |
(def o3 (m/bigobj 100 100)) ;; Compiles successfully | |
(def o4 (m/bigobj 10000 1)) ;; Does not compile |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(ns why-is-that.core) | |
(def test-1 (list (fn [arg] | |
arg) 1)) | |
;; (eval test-1) -> 1 | |
(def test-2 (list ((fn [] | |
(fn [arg] | |
['hello arg]))) 1)) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(ns simpleq.core) | |
(defn- start-simpleq-thread-loop [q thread-active exception] | |
(.start (Thread. | |
#((comment println "Thread started") | |
(loop [expr (first @q)] | |
(comment println "Sleeping for 2 sec") | |
(comment Thread/sleep 2000) | |
(comment println (str "Executing " expr)) |
NewerOlder