From ee8882e603388f4a544884cebd890b0fe4097198 Mon Sep 17 00:00:00 2001
From: Allan Blanchard <allan.blanchard@cea.fr>
Date: Wed, 11 May 2022 17:28:24 +0200
Subject: [PATCH] [kernel] fix some @raise

---
 src/kernel_services/cmdline_parameters/cmdline.mli | 2 +-
 src/libraries/project/state_builder.mli            | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/kernel_services/cmdline_parameters/cmdline.mli b/src/kernel_services/cmdline_parameters/cmdline.mli
index 572ee38ca02..b30852478e3 100644
--- a/src/kernel_services/cmdline_parameters/cmdline.mli
+++ b/src/kernel_services/cmdline_parameters/cmdline.mli
@@ -309,7 +309,7 @@ val add_aliases:
     option name [orig].
     If [visible] is set to false, the aliases do not appear in help messages.
     If [deprecated] is set to true, the use of the aliases emits a warning.
-    @Invalid_argument if an alias name is the empty string
+    @raise Invalid_argument if an alias name is the empty string
     @since Carbon-20110201
     @before 22.0-Titanium no [visible] and [deprecated] arguments. *)
 
diff --git a/src/libraries/project/state_builder.mli b/src/libraries/project/state_builder.mli
index 15b0fe12ff2..94f4dc217b4 100644
--- a/src/libraries/project/state_builder.mli
+++ b/src/libraries/project/state_builder.mli
@@ -236,7 +236,7 @@ module type Weak_hashtbl = sig
 
   val find: data -> data
   (** [find x] returns an instance of [x] found in table.
-      @Raise Not_found if there is no such element.
+      @raise Not_found if there is no such element.
       @since Boron-20100401 *)
 
   val find_all: data -> data list
-- 
GitLab