examples: reformat

Author: leostera

examples/processes/holder_annotated.ml

@@ -1,6 +1,6 @@
-type msg = [ | `Reset | `Add  of int | `Hello of string ]
+type msg = [ `Reset | `Add of int | `Hello of string ]
 
-type state = (string * int)
+type state = string * int
 
 let handle_message (state : state) (msg : msg option) =
   let x, y = state in

examples/processes/typed_reply.ml

@@ -1,7 +1,7 @@
 let rec a_loop pid recv i =
   match recv ~timeout:Process.Infinity with
   | None -> a_loop pid recv i
-  | Some `Noop  -> a_loop pid recv i
+  | Some `Noop -> a_loop pid recv i
   | Some (`Call (cb, msg)) ->
       Erlang.send cb i;
       a_loop pid recv (i + msg)