replaced &i/o-write with &i/o-read for IO read errors. Duuh.
This commit is contained in:
parent
a0c8346840
commit
432e1d9b87
|
@ -1266,7 +1266,7 @@
|
||||||
(refill bv idx cnt)]
|
(refill bv idx cnt)]
|
||||||
[else
|
[else
|
||||||
(io-error 'read id bytes
|
(io-error 'read id bytes
|
||||||
(make-i/o-write-error))])))])
|
(make-i/o-read-error))])))])
|
||||||
refill)
|
refill)
|
||||||
#f ;;; write!
|
#f ;;; write!
|
||||||
#f ;;; get-position
|
#f ;;; get-position
|
||||||
|
|
|
@ -1 +1 @@
|
||||||
1502
|
1504
|
||||||
|
|
Loading…
Reference in New Issue