Skip to content

Commit

Permalink
Use ! instead of complement
Browse files Browse the repository at this point in the history
  • Loading branch information
amalloy committed Mar 29, 2011
1 parent 018fbd3 commit 4c1e489
Show file tree
Hide file tree
Showing 2 changed files with 4 additions and 3 deletions.
3 changes: 2 additions & 1 deletion project.clj
Expand Up @@ -3,5 +3,6 @@
:dependencies [[clojure "1.2.1"]
[clojure-contrib "1.2.0"]]
:dev-dependencies [[org.clojars.gjahad/swank-clojure "1.3.1.1-SNAPSHOT"]
[clojure-source "1.2.1"]] ; 1.2, or what project wants
[clojure-source "1.2.1"]
[clj-stacktrace "0.2.0"]]
:jvm-opts ["-agentlib:jdwp=transport=dt_socket,server=y,suspend=n"])
4 changes: 2 additions & 2 deletions src/amalloy/utils.clj
Expand Up @@ -15,7 +15,7 @@

(defn trim-seq "Trim a sequence at the first nil element"
[s]
(take-while (complement nil?) s))
(take-while (! nil?) s))

(defcomp iterations
"Return a sequence of (f start), (f (f start))...until nil is
Expand All @@ -30,7 +30,7 @@
(apply juxt identity fs))

(defn annotate
"A vector of [x (f1 x) (f2 x)]."
"A vector of [x (f1 x) (f2 x) ...]."
[x & fs]
((apply decorate fs) x))

Expand Down

0 comments on commit 4c1e489

Please sign in to comment.