fix: 1xx codes are also success

This commit is contained in:
Simon Cruanes 2024-03-25 14:24:17 -04:00
parent ba17858063
commit a309c657c8
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4

View file

@ -29,4 +29,4 @@ let descr = function
| 503 -> "Service unavailable"
| n -> "Unknown response code " ^ string_of_int n (* TODO *)
let[@inline] is_success n = n >= 200 && n < 400
let[@inline] is_success n = n < 400