Add reproduction case for #1987

CHANGES.md

@@ -8,6 +8,7 @@ unreleased
     - 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)
+    - Add a test to reproduce [Locate command fails on multi-line type definitions](#1987) (#2020)
 
 merlin 5.6.1
 ============

tests/test-dirs/issue1987.t

@@ -0,0 +1,15 @@
+  $ cat > test.ml <<EOF
+  > type t =
+  > A | B
+  > let f = Fun.id
+  > EOF
+
+  $ $MERLIN single locate -position 3:0 -prefix List.hd -look-for interface -filename test.ml < test.ml | jq .value | jq .pos
+  {
+    "line": 76,
+    "col": 4
+  }
+
+-- FIXME : locate should also points to the list interface file. Merlin's environment before the end of the first structure item is Empty when it should be the initial env.
+  $ $MERLIN single locate -position 2:0 -prefix List.hd -look-for interface -filename test.ml < test.ml | jq .value
+  "Already at definition point"