refactor-open record field bug

ocaml · Apr 8, 2021 · 285e94a · 285e94a
1 parent 30362e7
commit 285e94a
Showing 1 changed file with 25 additions and 0 deletions.
diff --git a/tests/test-dirs/refactor-open/record_field.t b/tests/test-dirs/refactor-open/record_field.t
@@ -0,0 +1,25 @@
+FIXME refactor open rewriting the whole record instead of a field label
+  $ $MERLIN single refactor-open -action unqualify -position 4:7 <<EOF
+  > module M = struct
+  >   type r = {i: int}
+  > end
+  > open M
+  > let r = {M.i = 1}
+  > EOF
+  {
+    "class": "return",
+    "value": [
+      {
+        "start": {
+          "line": 5,
+          "col": 8
+        },
+        "end": {
+          "line": 5,
+          "col": 17
+        },
+        "content": "i"
+      }
+    ],
+    "notifications": []
+  }