Avoid NeoVim error when opening .mll files (#1557)

* Avoid NeoVim error when opening .mll files

Opening a .mll file results in:
`ocamllsp: -32600: unsuppported file extension`

Signed-off-by: Edwin Török <[email protected]>

* Add Changes entry

Signed-off-by: Edwin Török <[email protected]>

---------

Signed-off-by: Edwin Török <[email protected]>

Author: edwintorok

CHANGES.md

@@ -3,6 +3,7 @@
 ## Fixes
 
 - Fix hover on method calls not showing the type. (#1553, fixes #1552)
+- Fix error on opening `.mll` files (#1557)
 
 # 1.23.0
 

ocaml-lsp-server/src/document.ml

@@ -8,7 +8,7 @@ module Kind = struct
 
   let of_fname_opt p =
     match Filename.extension p with
-    | ".ml" | ".eliom" | ".re" -> Some Impl
+    | ".ml" | ".eliom" | ".re" | ".mll" | ".mly" -> Some Impl
     | ".mli" | ".eliomi" | ".rei" -> Some Intf
     | _ -> None
   ;;