mirror of
https://github.com/c-cube/tiny_httpd.git
synced 2025-12-06 11:15:35 -05:00
Update src/Tiny_httpd.ml
This commit is contained in:
parent
6ccd8314a3
commit
50f225638d
1 changed files with 1 additions and 2 deletions
|
|
@ -1101,8 +1101,7 @@ let run (self:t) : (unit,_) result =
|
||||||
raise e
|
raise e
|
||||||
);
|
);
|
||||||
with e ->
|
with e ->
|
||||||
Printf.eprintf "accept raised an exception: %s"
|
_debug (fun k->k "accept raised an exception: %s" (Printexc.to_string e))
|
||||||
(Printexc.to_string e)
|
|
||||||
done;
|
done;
|
||||||
Ok ()
|
Ok ()
|
||||||
with e -> Error e
|
with e -> Error e
|
||||||
|
|
|
||||||
Loading…
Add table
Reference in a new issue