My own corner of monopam
ocaml-sse: reflow sse.mli example after dune fmt
Pure formatting: dune fmt rebreaks the events List.iter call so the
let-binding header sits alone and the Printf.printf line collapses.
+6
-5
+6
-5
ocaml-sse/lib/sse.mli
+6
-5
ocaml-sse/lib/sse.mli
···
18
18
let parser = Sse.Parser.create ()
19
19
let reader = Bytes.Reader.of_string stream_data
20
20
let events = Sse.Parser.read parser reader
21
-
let () = List.iter
22
-
(fun (e : Sse.event) ->
23
-
Printf.printf "type=%s data=%s id=%s\n"
24
-
e.event e.data e.last_event_id)
25
-
events
21
+
22
+
let () =
23
+
List.iter
24
+
(fun (e : Sse.event) ->
25
+
Printf.printf "type=%s data=%s id=%s\n" e.event e.data e.last_event_id)
26
+
events
26
27
]}
27
28
28
29
{2 Server (serializing to a byte writer)}