From 35468e2862f1454ac5a30c9defecdc093e69c457 Mon Sep 17 00:00:00 2001
From: lubegasimon <lubegasimon73@gmail.com>
Date: Sun, 19 Dec 2021 14:58:12 +0300
Subject: [PATCH] update the test module and promote tests

---
 test/integration/markdown.t/run.t    | 21 ++++++++++-----------
 test/integration/markdown.t/test.mli |  7 +++----
 2 files changed, 13 insertions(+), 15 deletions(-)

diff --git a/test/integration/markdown.t/run.t b/test/integration/markdown.t/run.t
index b2a66b4352..8652d8e236 100644
--- a/test/integration/markdown.t/run.t
+++ b/test/integration/markdown.t/run.t
@@ -21,7 +21,7 @@
   
   ######       type t
   
-  Doc for type t .
+  Doc for `type t`
   
   ######       type a = t
   
@@ -39,8 +39,6 @@
   
   ######           type foo
   
-  docs for x
-  
   ######           type bar'
   
   ######           module type Foo' = sig
@@ -51,12 +49,14 @@
   
   ######                   | Mon
   
-  first day of the week.
+  Docs for `days`
   
   ######               type num = [
   
   ######                   | `One
   
+  Docs for `` `One``
+  
   ######               ]
   
   ######           end
@@ -75,7 +75,7 @@
   
   ######           fname : string ;
   
-  first name
+  Docs for `fname`
   
   ######           lname : string ;
   
@@ -183,7 +183,7 @@
   
   ######       type t
   
-  Doc for type t .
+  Doc for `type t`
   
   <a id="type-a"></a>
   
@@ -215,8 +215,6 @@
   
   ######           type foo
   
-  docs for x
-  
   <a id="type-bar'"></a>
   
   ######           type bar'
@@ -237,7 +235,7 @@
   
   ######                   | Mon
   
-  first day of the week.
+  Docs for `days`
   
   <a id="type-num"></a>
   
@@ -247,6 +245,8 @@
   
   ######                   | `One
   
+  Docs for `` `One``
+  
   ######               ]
   
   ######           end
@@ -275,7 +275,7 @@
   
   ######           fname : string ;
   
-  first name
+  Docs for `fname`
   
   <a id="type-name.lname"></a>
   
@@ -365,4 +365,3 @@
   - Mon
   
   - Tue
-
diff --git a/test/integration/markdown.t/test.mli b/test/integration/markdown.t/test.mli
index 0dca2439a8..83a9fa60e5 100644
--- a/test/integration/markdown.t/test.mli
+++ b/test/integration/markdown.t/test.mli
@@ -25,23 +25,22 @@ end
 
 module type Foo = sig
   type foo
-  (** docs for x *)
 
   include Bar'
 
   module type Foo' = sig
     type foo'
 
-    type days = Mon  (** first day of the week. *)
+    type days = Mon  (** Docs for [days]. *)
 
-    type num = [ `One ]
+    type num = [ `One (** Docs for [`One]*)]
   end
 end
 
 type other_names = { given : string; nickname : string }
 
 type name = {
-  fname : string;  (** first name *)
+  fname : string;  (** Docs for [fname] *)
   lname : string;
   others : other_names;
 }