io: fix call to raise-arguments-error

This commit is contained in:
Matthew Flatt 2019-09-02 06:26:26 -06:00
parent 88464b327a
commit 36e00806de

View File

@ -170,8 +170,8 @@
(define c (bytes-converter-c converter))
(unless c
(end-atomic)
(raise-argument-error who "converter is closed"
"converter" converter))
(raise-arguments-error who "converter is closed"
"converter" converter))
(define use-dest-bstr (or dest-bstr
(make-bytes (if dest-end-pos
(- dest-end-pos dest-start-pos)