ocaml: Small query improvements and fix autoclose brackets (#7769)

rmu created 

Turns out auto-closing words was a bad idea. win**do**w, **struct**ure,
**sig**n and so on

They don't serve any purpose in `config.toml` nor `brackets.scm` at this
point, so I removed them>

Release Notes:
- N/A

Change summary

crates/languages/src/ocaml-interface/brackets.scm | 3 ---
crates/languages/src/ocaml-interface/config.toml  | 5 +----
crates/languages/src/ocaml/brackets.scm           | 5 -----
crates/languages/src/ocaml/config.toml            | 8 +-------
crates/languages/src/ocaml/highlights.scm         | 3 ++-
crates/languages/src/ocaml/indents.scm            | 2 ++
6 files changed, 6 insertions(+), 20 deletions(-)

Detailed changes

crates/languages/src/ocaml-interface/config.toml 🔗 

@@ -7,8 +7,5 @@ brackets = [
   { start = "{", end = "}", close = true, newline = true },
   { start = "<", end = ">", close = true, newline = true },
   { start = "[", end = "]", close = true, newline = true },
-  { start = "(", end = ")", close = true, newline = true },
-  { start = "sig", end = " end", close = true, newline = true },
-  # HACK: For some reason `object` alone does not work
-  { start = "object ", end = "end", close = true, newline = true },
+  { start = "(", end = ")", close = true, newline = true }
 ]

crates/languages/src/ocaml/brackets.scm 🔗 

@@ -5,8 +5,3 @@
 ("<" @open ">" @close)
 ("\"" @open "\"" @close)
 
-("begin" @open "end" @close)
-("struct" @open "end" @close)
-("sig" @open "end" @close)
-("object" @open "end" @close)
-("do" @open "done" @close)

crates/languages/src/ocaml/config.toml 🔗 

@@ -9,11 +9,5 @@ brackets = [
   { start = "[", end = "]", close = true, newline = true },
   { start = "[|", end = "|", close = true, newline = true, not_in = ["string"] },
   { start = "(", end = ")", close = true, newline = true },
-  { start = "\"", end = "\"", close = true, newline = false, not_in = ["string"] },
-  { start = "begin", end = " end", close = true, newline = true },
-  { start = "struct", end = " end", close = true, newline = true },
-  { start = "sig", end = " end", close = true, newline = true },
-  # HACK: For some reason `object` alone does not work
-  { start = "object ", end = "end", close = true, newline = true },
-  { start = "do", end = " done", close = true, newline = true }
+  { start = "\"", end = "\"", close = true, newline = false, not_in = ["string"] }
 ]

crates/languages/src/ocaml/highlights.scm 🔗 

@@ -8,7 +8,8 @@
 
 [(class_name) (class_type_name) (type_constructor)] @type
 
-[(constructor_name) (tag)] @constructor
+(tag) @variant ;; Polymorphic Variants
+(constructor_name) @constructor ;; Exceptions, variants and the like
 
 ; Functions
 ;----------