diff --git a/dao.ml b/dao.ml
index 27b8bda..9344c1f 100644
--- a/dao.ml
+++ b/dao.ml
@@ -81,7 +81,7 @@ let vifs client domid =
           let get_client_ip () =
             let* str = Xen_os.Xs.read handle (Fmt.str "%s/%d/ip" path device_id) in
             let client_ip = List.hd (String.split_on_char ' ' str) in
-            (* XXX(dinosaure): it's safe to use [List.hd] here,
+            (* NOTE(dinosaure): it's safe to use [List.hd] here,
                [String.split_on_char] can not return an empty list. *)
             Lwt.return_some (vif, Ipaddr.V4.of_string_exn client_ip)
           in
diff --git a/dispatcher.ml b/dispatcher.ml
index 9dd374e..60927f6 100644
--- a/dispatcher.ml
+++ b/dispatcher.ml
@@ -403,7 +403,7 @@ struct
         (function Lwt.Canceled -> Lwt.return_unit | e -> Lwt.fail e)
     in
     Cleanup.on_cleanup cleanup_tasks (fun () -> Lwt.cancel listener);
-    (* XXX(dinosaure): [qubes_updater] and [listener] can be forgotten, our [cleanup_task]
+    (* NOTE(dinosaure): [qubes_updater] and [listener] can be forgotten, our [cleanup_task]
        will cancel them if the client is disconnected. *)
     Lwt.async (fun () -> Lwt.pick [ qubesdb_updater; listener ]);
     Lwt.return_unit