Compare commits
4 commits
master
...
sci-IRecor
| Author | SHA1 | Date | |
|---|---|---|---|
|
|
e80cbf2779 | ||
|
|
0e2d936cf6 | ||
|
|
5398646641 | ||
|
|
5d9a6b2b30 |
3 changed files with 4 additions and 6 deletions
2
sci
2
sci
|
|
@ -1 +1 @@
|
|||
Subproject commit 5e4978df1f935f38bbf902ec962ec9690d8eaedd
|
||||
Subproject commit 248fcaf7873416b1a895510ce715a5d9b5e143fd
|
||||
|
|
@ -11,10 +11,6 @@
|
|||
;; get: 'Not implemented: seq', because print-method thought this object was
|
||||
;; seqable, while in fact, it wasn't.
|
||||
|
||||
(defn method-or-bust [methods k]
|
||||
(or (get methods k)
|
||||
(throw (UnsupportedOperationException. "Method not implemented: " k))))
|
||||
|
||||
(defmacro gen-reify-combos
|
||||
"Generates pre-compiled reify combinations"
|
||||
[methods]
|
||||
|
|
@ -120,7 +116,8 @@
|
|||
equiv [[this x]]}
|
||||
|
||||
clojure.lang.IReduce
|
||||
{reduce [[this f]]}
|
||||
{reduce [[this f]
|
||||
[this f init]]}
|
||||
|
||||
clojure.lang.IReduceInit
|
||||
{reduce [[this f initial]]}
|
||||
|
|
|
|||
|
|
@ -33,6 +33,7 @@
|
|||
(let [namespaces (seq (filter test-namespace? namespaces))]
|
||||
(when (seq namespaces)
|
||||
(doseq [n namespaces]
|
||||
(println "Requiring" n)
|
||||
(require n)
|
||||
(filter-vars! (find-ns n) #(-> % meta ((some-fn :skip-bb
|
||||
:test-check-slow)) not)))
|
||||
|
|
|
|||
Loading…
Reference in a new issue