ReScript v11 syntax changes

- highlight `dict`, `result`, `:>` and `...`
- Don't highlight template string prefix

Author: aspeddro

syntax/rescript.vim

@@ -18,7 +18,7 @@ syntax keyword resException try catch exception assert
 syntax keyword resKeyword async await
 
 " Types
-syntax keyword resType bool int float char string unit promise
+syntax keyword resType bool int float char string unit promise dict result
 syntax keyword resType array option ref exn format
 syntax match resType "list{\@!"
 
@@ -101,8 +101,7 @@ syntax region resCustomOperator start="\v\\\"" end="\v\""
 " Interpolation
 syntax match resInterpolationVariable "\v\$[a-z_][A-Za-z0-0_'$]*" contained
 syntax region resInterpolationBlock matchgroup=resInterpolationDelimiters start="\v\$\{" end="\v\}" contained contains=TOP
-syntax region resString start="\v`" end="\v`" contains=resInterpolationBlock,resInterpolatedStringEscapeSeq
-syntax region resString start="\v[a-z]`" end="\v`" contains=resInterpolationBlock,resInterpolationVariable,resInterpolatedStringEscapeSeq
+syn region  resString start=+`+  skip=+\\\\\|\\`+  end=+`+	contains=resInterpolationBlock,resInterpolationVariable,resInterpolatedStringEscapeSeq
 
 " Polymorphic variants
 syntax match resPolyVariant "\v#[A-za-z][A-Za-z0-9_'$]*"

test/syntax/expected/highlight.res.txt

@@ -301,4 +301,36 @@
         hl_group = "resType",
         hl_group_link = "Type"
       } }
+  }, {
+    col = 9,
+    row = 135,
+    syntax = {}
+  }, {
+    col = 10,
+    row = 138,
+    syntax = { {
+        hl_group = "resType",
+        hl_group_link = "Type"
+      } }
+  }, {
+    col = 10,
+    row = 141,
+    syntax = { {
+        hl_group = "resType",
+        hl_group_link = "Type"
+      } }
+  }, {
+    col = 21,
+    row = 144,
+    syntax = { {
+        hl_group = "resNone",
+        hl_group_link = "resNone"
+      } }
+  }, {
+    col = 7,
+    row = 147,
+    syntax = { {
+        hl_group = "resNone",
+        hl_group_link = "resNone"
+      } }
   } }

test/syntax/highlight.res

@@ -132,3 +132,18 @@ let ref = ref(false)
    //^
 let option = None
     //^
+
+let _ = sql`select * from table`
+        //^
+
+type a = dict<string>
+         //^
+
+type b = result<int, string>
+         //^
+
+let _ = (x: r1) => (x :> r2)
+                    //^
+
+foo(1, ...)
+      //^