@@ -18,7 +18,7 @@ syntax keyword resException try catch exception assert
1818syntax keyword resKeyword async await
1919
2020" Types
21- syntax keyword resType bool int float char string unit promise
21+ syntax keyword resType bool int float char string unit promise dict result
2222syntax keyword resType array option ref exn format
2323syntax match resType " list{\@ !"
2424
@@ -47,6 +47,8 @@ syntax match resOperator "\v\@"
4747
4848syntax match resOperator " \v\! "
4949syntax match resOperator " \v\& "
50+ syntax match resOperator " \v\:\> "
51+ syntax match resOperator " \v\.\.\. "
5052
5153" Delimiter
5254syntax match resDelimiter " \v\| "
@@ -101,8 +103,7 @@ syntax region resCustomOperator start="\v\\\"" end="\v\""
101103" Interpolation
102104syntax match resInterpolationVariable " \v\$ [a-z_][A-Za-z0-0_'$]*" contained
103105syntax region resInterpolationBlock matchgroup =resInterpolationDelimiters start =" \v\$\{ " end =" \v\} " contained contains =TOP
104- syntax region resString start =" \v `" end =" \v `" contains =resInterpolationBlock,resInterpolatedStringEscapeSeq
105- syntax region resString start =" \v [a-z]`" end =" \v `" contains =resInterpolationBlock,resInterpolationVariable,resInterpolatedStringEscapeSeq
106+ syn region resString start =+ `+ skip =+ \\\\\|\\ `+ end =+ `+ contains =resInterpolationBlock,resInterpolationVariable,resInterpolatedStringEscapeSeq
106107
107108" Polymorphic variants
108109syntax match resPolyVariant " \v #[A-za-z][A-Za-z0-9_'$]*"
0 commit comments