Add type-hint for new LZ4 dep

This commit is contained in:
Peter Taoussanis 2014-11-27 15:43:31 +07:00
parent 5cedeacf63
commit f1b4c7ff88

View file

@ -77,7 +77,8 @@
(let [len-decomp (alength ^bytes ba) (let [len-decomp (alength ^bytes ba)
max-len-comp (.maxCompressedLength compressor len-decomp) max-len-comp (.maxCompressedLength compressor len-decomp)
ba-comp* (byte-array max-len-comp) ; Over-sized ba-comp* (byte-array max-len-comp) ; Over-sized
len-comp (.compress compressor ba 0 len-decomp ba-comp* 0 max-len-comp) len-comp (.compress compressor ^bytes ba 0 len-decomp
ba-comp* 0 max-len-comp)
;; ;;
baos (ByteArrayOutputStream. (+ len-comp 4)) baos (ByteArrayOutputStream. (+ len-comp 4))
dos (DataOutputStream. baos)] dos (DataOutputStream. baos)]