More informative HTTP reading error message
This commit is contained in:
parent
921456f3ad
commit
d120286f89
|
@ -193,7 +193,7 @@
|
|||
[(list _ field value)
|
||||
(list* (make-header field (read-one-head in value))
|
||||
(read-header))])]
|
||||
[else (network-error 'read-headers "malformed header")])))
|
||||
[else (network-error 'read-headers "malformed header: ~e" l)])))
|
||||
|
||||
; read-one-head : iport bytes -> bytes
|
||||
(define (read-one-head in rhs)
|
||||
|
|
Loading…
Reference in New Issue
Block a user