wip
This commit is contained in:
parent
0e744b1e2f
commit
5d9a6b2b30
2 changed files with 3 additions and 6 deletions
2
sci
2
sci
|
|
@ -1 +1 @@
|
||||||
Subproject commit 5e4978df1f935f38bbf902ec962ec9690d8eaedd
|
Subproject commit 921bd564bfacf096eec345825fe83072a999736b
|
||||||
|
|
@ -11,10 +11,6 @@
|
||||||
;; get: 'Not implemented: seq', because print-method thought this object was
|
;; get: 'Not implemented: seq', because print-method thought this object was
|
||||||
;; seqable, while in fact, it wasn't.
|
;; 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
|
(defmacro gen-reify-combos
|
||||||
"Generates pre-compiled reify combinations"
|
"Generates pre-compiled reify combinations"
|
||||||
[methods]
|
[methods]
|
||||||
|
|
@ -120,7 +116,8 @@
|
||||||
equiv [[this x]]}
|
equiv [[this x]]}
|
||||||
|
|
||||||
clojure.lang.IReduce
|
clojure.lang.IReduce
|
||||||
{reduce [[this f]]}
|
{reduce [[this f]
|
||||||
|
[this f init]]}
|
||||||
|
|
||||||
clojure.lang.IReduceInit
|
clojure.lang.IReduceInit
|
||||||
{reduce [[this f initial]]}
|
{reduce [[this f initial]]}
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue