Skip to content

Instantly share code, notes, and snippets.

View ctdean's full-sized avatar

Chris Dean ctdean

  • Treasury Prime
  • Programmer, hack thyself
View GitHub Profile
(slime-setup '(slime-autodoc
slime-asdf
slime-banner
slime-repl
slime-compiler-notes-tree
slime-fancy))
(defn separate-2 [f coll]
(loop [coll coll
in nil
out nil]
(if (empty? coll)
[(reverse in) (reverse out)]
(let [cur (first coll)]
(if (f cur)
(recur (rest coll) (cons cur in) out)
(recur (rest coll) in (cons cur out)))))))
(defproject test-swank "1.0.0-SNAPSHOT"
:description "FIXME: write"
:dependencies [[org.clojure/clojure "1.1.0"]
[org.clojure/clojure-contrib "1.0-SNAPSHOT"]]
:dev-dependencies [[leiningen/lein-swank "1.0.0-SNAPSHOT"]])
#
# log4j.properties
#
# Chris Dean
log4j.rootLogger = DEBUG, standard
log4j.appender.standard = org.apache.log4j.FileAppender
log4j.appender.standard.File = /project/kineto/log/kineto.log
#
# commons-logging.properties
#
# Chris Dean
# Use Log4j
org.apache.commons.logging.Log=org.apache.commons.logging.impl.Log4JLogger
# Configuration file of the log
(defn lazy-map-cat [f colls]
(letfn [(cat [seqs]
(lazy-cat
(and (seq seqs)
(concat (first seqs)
(cat (rest seqs))))))]
(cat (map f colls))))
require 'buildr/clojure'
VERSION_NUMBER = "1.0.0"
GROUP = "clj-ants-sim"
repositories.remote << "http://repo1.maven.org/maven2"
deps = %w{
org.clojure:clojure:jar:1.1.0
org.clojure:clojure-contrib:jar:1.1.0
@ctdean
ctdean / gist:553972
Created August 27, 2010 19:04
JarJar Buildfile
require 'buildr/clojure'
VERSION_NUMBER = "1.0.0"
GROUP = "clj-ants-sim"
repositories.remote << "http://repo1.maven.org/maven2"
deps = %w{
org.clojure:clojure:jar:1.1.0
org.clojure:clojure-contrib:jar:1.1.0
@ctdean
ctdean / pallet-doc.patch
Created August 25, 2011 19:43
Doc patch for doc/first_steps.org
diff --git a/doc/first_steps.org b/doc/first_steps.org
index c95c977..f5dcd60 100644
--- a/doc/first_steps.org
+++ b/doc/first_steps.org
@@ -76,9 +76,9 @@ the =:services= key. You will need to create this file.
#+begin_src clojure
(defpallet
- :serivces
+ :services
@ctdean
ctdean / hcat-files.txt
Created September 26, 2011 17:07
hcatalog file list
./DISCLAIMER.txt
./lib/.svn/entries
./lib/.svn/prop-base/hadoop_archive-0.3.1.jar.svn-base
./lib/.svn/prop-base/libthrift.jar.svn-base
./lib/.svn/text-base/hadoop_archive-0.3.1.jar.svn-base
./lib/.svn/text-base/libthrift.jar.svn-base
./lib/.svn/all-wcprops
./lib/hadoop_archive-0.3.1.jar
./lib/libthrift.jar
./hive/external/odbc/testdata/dataset1.input