From 33d99b7ea081fd88c6fe1890d39036a1099bc765 Mon Sep 17 00:00:00 2001 From: PizieDust Date: Tue, 27 Feb 2024 14:34:42 +0100 Subject: [PATCH] helper function for positions --- ocaml-lsp-server/test/e2e-new/syntax_doc_tests.ml | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/ocaml-lsp-server/test/e2e-new/syntax_doc_tests.ml b/ocaml-lsp-server/test/e2e-new/syntax_doc_tests.ml index a1667f613..cf081c87d 100644 --- a/ocaml-lsp-server/test/e2e-new/syntax_doc_tests.ml +++ b/ocaml-lsp-server/test/e2e-new/syntax_doc_tests.ml @@ -68,7 +68,7 @@ let%expect_test "syntax doc should display" = let source = {ocaml| type color = Red|Blue |ocaml} in - let position = Position.create ~line:1 ~character:9 in + let position = create_postion 1 9 in let req client = let* () = change_config client activate_syntax_doc in let* resp = hover_req client position in @@ -94,7 +94,7 @@ let%expect_test "syntax doc should not display" = let source = {ocaml| type color = Red|Blue |ocaml} in - let position = Position.create ~line:1 ~character:9 in + let position = create_postion 1 9 in let req client = let* () = change_config client deactivate_syntax_doc in let* resp = hover_req client position in @@ -116,7 +116,7 @@ let%expect_test "syntax doc should print" = let source = {ocaml| type t = .. |ocaml} in - let position = Position.create ~line:1 ~character:9 in + let position = create_postion 1 9 in let req client = let* () = change_config client activate_syntax_doc in let* resp = hover_req client position in @@ -141,7 +141,7 @@ let%expect_test "should receive no hover response" = let source = {ocaml| let a = 1 |ocaml} in - let position = Position.create ~line:1 ~character:5 in + let position = create_postion 1 5 in let req client = let* () = change_config client activate_syntax_doc in let* resp = hover_req client position in