diff options
| author | Stuart Halloway <stu@thinkrelevance.com> | 2010-10-12 19:56:39 -0400 |
|---|---|---|
| committer | Stuart Halloway <stu@thinkrelevance.com> | 2010-10-12 19:56:39 -0400 |
| commit | 2ed7cf32a8d4cda700e5bdc04793956580465f67 (patch) | |
| tree | 0119d8ed7a25b42e9778e9bd6fb639d4107e7e59 /src | |
| parent | 3c148e2ee7f244fccd246365010055dcc946abe0 (diff) | |
:added metadata for diff
Diffstat (limited to 'src')
| -rw-r--r-- | src/clj/clojure/data.clj | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/src/clj/clojure/data.clj b/src/clj/clojure/data.clj index fc962049..f5730016 100644 --- a/src/clj/clojure/data.clj +++ b/src/clj/clojure/data.clj @@ -30,13 +30,13 @@ (declare diff) -(defprotocol EqualityPartition +(defprotocol ^{:added "1.3"} EqualityPartition "Implementation detail. Subject to change." - (equality-partition [x] "Implementation detail. Subject to change.")) + (^{:added "1.3"} equality-partition [x] "Implementation detail. Subject to change.")) -(defprotocol Diff +(defprotocol ^{:added "1.3"} Diff "Implementation detail. Subject to change." - (diff-similar [a b] "Implementation detail. Subject to change.")) + (^{:added "1.3"} diff-similar [a b] "Implementation detail. Subject to change.")) (extend nil Diff @@ -101,6 +101,7 @@ by their indexes, with results returned as vectors. * Everything else (including strings!) is treated as an atom and compared for equality." + {:added "1.3"} [a b] (if (= (equality-partition a) (equality-partition b)) (diff-similar a b) |