diff --git a/doc/CHANGES b/CHANGES
similarity index 100%
rename from doc/CHANGES
rename to CHANGES
diff --git a/src/unix/lwt_unix.mli b/src/unix/lwt_unix.mli
index bb9e1a61ac..5b0831f66e 100644
--- a/src/unix/lwt_unix.mli
+++ b/src/unix/lwt_unix.mli
@@ -1100,7 +1100,7 @@ type flush_queue =
   | TCIOFLUSH
 
 val tcflush : file_descr -> flush_queue -> unit Lwt.t
-  (** Wrapper for [Unix.tcflush] *)
+  (** Wrapper for [Unix.tcflush]. *)
 
 type flow_action =
     Unix.flow_action =