Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

rename defcurry-all

  • Loading branch information...
commit e2afb72da2542fb5ee73702c876b919635634b46 1 parent 7f8c99a
@fogus fogus authored
View
2  src/main/clojure/clojure/core/contracts/constraints.clj
@@ -59,7 +59,7 @@
(not (<=> p q)))
-(defcurry-all clojure.core
+(defcurry-from clojure.core
== = not=)
(comment
View
10 src/main/clojure/clojure/core/contracts/impl/utils.clj
@@ -41,7 +41,7 @@
[name doc meta args & body]
(do-curried name doc meta args body))
-(defmacro defcurry-all
+(defmacro defcurry-from
"Builds a pass-through curried fn for each name."
[namespace & names]
(->> (for [n names]
@@ -55,13 +55,13 @@
(comment
(macroexpand
- '(defcurry-all clojure.core
+ '(defcurry-from clojure.core
== =))
-
+
((== 1) 1)
-
+
(defcurried ===
"test"
{:added "1.5"}
@@ -70,4 +70,4 @@
((=== 1) 2)
-)
+)
Please sign in to comment.
Something went wrong with that request. Please try again.