io: fix call to raise-arguments-error
This commit is contained in:
parent
88464b327a
commit
36e00806de
|
@ -170,8 +170,8 @@
|
||||||
(define c (bytes-converter-c converter))
|
(define c (bytes-converter-c converter))
|
||||||
(unless c
|
(unless c
|
||||||
(end-atomic)
|
(end-atomic)
|
||||||
(raise-argument-error who "converter is closed"
|
(raise-arguments-error who "converter is closed"
|
||||||
"converter" converter))
|
"converter" converter))
|
||||||
(define use-dest-bstr (or dest-bstr
|
(define use-dest-bstr (or dest-bstr
|
||||||
(make-bytes (if dest-end-pos
|
(make-bytes (if dest-end-pos
|
||||||
(- dest-end-pos dest-start-pos)
|
(- dest-end-pos dest-start-pos)
|
||||||
|
|
Loading…
Reference in New Issue
Block a user