Merge pull request #120 from KeenS/bytevector-append
fix bug of `bytevector-append`
This commit is contained in:
commit
65038c9504
|
@ -802,7 +802,7 @@
|
||||||
(bytevector-copy! res 0 v)
|
(bytevector-copy! res 0 v)
|
||||||
(bytevector-copy! res (bytevector-length v) w)
|
(bytevector-copy! res (bytevector-length v) w)
|
||||||
res))
|
res))
|
||||||
(fold bytevector-append-2-inv #() vs))
|
(fold bytevector-append-2-inv #u8() vs))
|
||||||
|
|
||||||
(define (bytevector->list v start end)
|
(define (bytevector->list v start end)
|
||||||
(do ((i start (+ i 1))
|
(do ((i start (+ i 1))
|
||||||
|
|
Loading…
Reference in New Issue