@@ -1664,7 +1664,7 @@ let m_e_i_s_value mod_name n val_name =
16641664 type_ =
16651665 Odoc_model.Lang.TypeExpr.Constr
16661666 (`Identifier
1667- (`Type (`Module (`Root (`RootPage None, Root), Foo3), $t$ 2), false),
1667+ (`Type (`Module (`Root (`RootPage None, Root), Foo3), {t{ 2), false),
16681668 [])}
16691669```
16701670
@@ -1701,7 +1701,7 @@ let sg = Common.signature_of_mli_string test_data;;
17011701{Odoc_model.Lang.Signature.items =
17021702 [Odoc_model.Lang.Signature.Type (Odoc_model.Lang.Signature.Ordinary,
17031703 {Odoc_model.Lang.TypeDecl.id =
1704- `Type (`Module (`Root (`RootPage None, Root), Foo3), $t$ 3);
1704+ `Type (`Module (`Root (`RootPage None, Root), Foo3), {t{ 3);
17051705 doc = [];
17061706 equation =
17071707 {Odoc_model.Lang.TypeDecl.Equation.params = []; private_ = false;
@@ -1722,15 +1722,15 @@ let sg = Common.signature_of_mli_string test_data;;
17221722 type_ =
17231723 Odoc_model.Lang.TypeExpr.Constr
17241724 (`Identifier
1725- (`Type (`Module (`Root (`RootPage None, Root), Foo3), $t$ 3), false),
1725+ (`Type (`Module (`Root (`RootPage None, Root), Foo3), {t{ 3), false),
17261726 [])}];
17271727 compiled = false}
17281728# Common.LangUtils.Lens.get (module_expansion_include_sig "Foo3" 1) sg;;
17291729- : Odoc_model.Lang.Signature.t =
17301730{Odoc_model.Lang.Signature.items =
17311731 [Odoc_model.Lang.Signature.Type (Odoc_model.Lang.Signature.Ordinary,
17321732 {Odoc_model.Lang.TypeDecl.id =
1733- `Type (`Module (`Root (`RootPage None, Root), Foo3), $t$ 4);
1733+ `Type (`Module (`Root (`RootPage None, Root), Foo3), {t{ 4);
17341734 doc = [];
17351735 equation =
17361736 {Odoc_model.Lang.TypeDecl.Equation.params = []; private_ = false;
@@ -1751,7 +1751,7 @@ let sg = Common.signature_of_mli_string test_data;;
17511751 type_ =
17521752 Odoc_model.Lang.TypeExpr.Constr
17531753 (`Identifier
1754- (`Type (`Module (`Root (`RootPage None, Root), Foo3), $t$ 4), false),
1754+ (`Type (`Module (`Root (`RootPage None, Root), Foo3), {t{ 4), false),
17551755 [])}];
17561756 compiled = false}
17571757```
@@ -1791,7 +1791,7 @@ let sg = Common.signature_of_mli_string test_data;;
17911791{Odoc_model.Lang.Signature.items =
17921792 [Odoc_model.Lang.Signature.Type (Odoc_model.Lang.Signature.Ordinary,
17931793 {Odoc_model.Lang.TypeDecl.id =
1794- `Type (`Module (`Root (`RootPage None, Root), Foo3), $t$ 5);
1794+ `Type (`Module (`Root (`RootPage None, Root), Foo3), {t{ 5);
17951795 doc = [];
17961796 equation =
17971797 {Odoc_model.Lang.TypeDecl.Equation.params = []; private_ = false;
@@ -1819,7 +1819,7 @@ let sg = Common.signature_of_mli_string test_data;;
18191819 type_ =
18201820 Odoc_model.Lang.TypeExpr.Constr
18211821 (`Identifier
1822- (`Type (`Module (`Root (`RootPage None, Root), Foo3), $t$ 5), false),
1822+ (`Type (`Module (`Root (`RootPage None, Root), Foo3), {t{ 5), false),
18231823 [])}];
18241824 compiled = false}
18251825```
@@ -1858,7 +1858,7 @@ let sg = Common.signature_of_mli_string test_data;;
18581858{Odoc_model.Lang.Signature.items =
18591859 [Odoc_model.Lang.Signature.Module (Odoc_model.Lang.Signature.Ordinary,
18601860 {Odoc_model.Lang.Module.id =
1861- `Module (`Module (`Root (`RootPage None, Root), Foo3), $ Bar$ 7);
1861+ `Module (`Module (`Root (`RootPage None, Root), Foo3), { Bar{ 7);
18621862 doc = [];
18631863 type_ =
18641864 Odoc_model.Lang.Module.Alias
@@ -1875,7 +1875,7 @@ let sg = Common.signature_of_mli_string test_data;;
18751875 Odoc_model.Lang.TypeExpr.Constr
18761876 (`Dot
18771877 (`Identifier
1878- (`Module (`Module (`Root (`RootPage None, Root), Foo3), $ Bar$ 7),
1878+ (`Module (`Module (`Root (`RootPage None, Root), Foo3), { Bar{ 7),
18791879 true),
18801880 "t"),
18811881 [])}];
0 commit comments