Fix Outputstream proxy for kaocha

This commit is contained in:
Michiel Borkent 2023-01-21 16:25:39 +01:00
parent 6feb785cb0
commit fe6042a06f

View file

@ -103,15 +103,15 @@
["java.io.OutputStream" #{}]
(proxy [java.io.OutputStream] []
(close [] (if-let [m (get methods 'close)]
(m this)
(proxy-super close)))
(flush [] (if-let [m (get methods 'flush)]
(m this)
(proxy-super flush)))
(close [] (when-let [m (get methods 'close)]
(m this)))
(flush [] (when-let [m (get methods 'flush)]
(m this)))
(write
([b] ((method-or-bust methods 'write) this b))
([b off len] ((method-or-bust methods 'write) this b off len))))
([b]
((method-or-bust methods 'write) this b))
([b off len]
((method-or-bust methods 'write) this b off len))))
, ;; keep this for merge friendliness
)))