From b3f254446d1b82bd6ec09909137e16cac815fda8 Mon Sep 17 00:00:00 2001 From: Simon Cruanes Date: Sat, 8 Feb 2020 09:37:12 -0600 Subject: [PATCH] strip whitespace --- src/Tiny_httpd.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Tiny_httpd.ml b/src/Tiny_httpd.ml index 72e0f528..c34602f2 100644 --- a/src/Tiny_httpd.ml +++ b/src/Tiny_httpd.ml @@ -268,7 +268,7 @@ module Response_code = struct | n -> "Unknown response code " ^ string_of_int n (* TODO *) end -type 'a resp_result = ('a, Response_code.t * string) result +type 'a resp_result = ('a, Response_code.t * string) result let unwrap_resp_result = function | Ok x -> x | Error (c,s) -> raise (Bad_req (c,s))