Apply suggestions from code review

Co-authored-by: Kate <[email protected]>

src/ocamlbuild_executor.ml

@@ -75,7 +75,7 @@ let output_lines prefix oc buffer =
       in
       (* ignore trailing CR *)
       let k = ref j in
-      while !k > i && u.[!k - 1] = '\r' do decr k done;
+      while !k > (i : int) && u.[!k - 1] = '\r' do decr k done;
       output_line i !k;
       loop (j + 1)
     else

src/shell.ml

@@ -33,7 +33,7 @@ let generic_quote quotequote s =
   for i = 0 to l - 1 do
     if s.[i] = '\''
     then Buffer.add_string b quotequote
-    else Buffer.add_char b  s.[i]
+    else Buffer.add_char b s.[i]
   done;
   Buffer.add_char b '\'';
   Buffer.contents b