fix bug of `bytevector-append`
This commit is contained in:
parent
d71666624b
commit
49e2148d38
|
@ -798,7 +798,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