Add reproduction case for #1763

CHANGES.md

@@ -7,6 +7,7 @@ unreleased
     - Fix record field autocompletion (#2028)
     - Signature help should not loop over the parameters once it is finished (#2023)
     - Add a reproduction case for #1214, the issue has been resolved before (#2022)
+    - Add reproduction case for #1763 but it is not failing anymore (#2021)
 
 merlin 5.6.1
 ============

tests/test-dirs/issue1763.t

@@ -0,0 +1,33 @@
+  $ $MERLIN single type-enclosing -position 8:0 <<EOF | jq '.value[].type'
+  > module Foo = struct
+  >   let hidden = 3
+  > end
+  > 
+  > include struct
+  >   open Foo
+  >   let visible = 4
+  > end
+  > EOF
+  "sig val visible : int end"
+
+  $ $MERLIN single type-enclosing -position 7:0 <<EOF | jq '.value[].type'
+  > include struct
+  >   module Foo = struct
+  >     let hidden = 3
+  >   end
+  >   open Foo
+  >   let visible = 4
+  > end
+  > EOF
+  "sig module Foo : sig val hidden : int end val visible : int end"
+
+This was failing in the issue but appears to not fail anymore with the actual merlin
+  $ $MERLIN single type-enclosing -position 6:0 <<EOF | jq '.value[].type'
+  > include struct
+  >   open struct
+  >     let hidden = 3
+  >   end
+  >   let visible = 4
+  > end
+  > EOF
+  "sig val visible : int end"