summaryrefslogtreecommitdiff
path: root/queries/ocaml
diff options
context:
space:
mode:
authorPau Ruiz Safont <unduthegun@gmail.com>2020-09-15 13:40:57 +0100
committerStephan Seitz <stephan.lauf@yahoo.de>2020-09-19 13:35:12 +0200
commit465ed3749447433f9530c1d5884d97aba183fd3d (patch)
tree03ce9ee75b308a5409c151fb2ad6ce36df39c292 /queries/ocaml
parent749a8a7f25f6aaee7adcb2c0d6b4cbcf98695346 (diff)
ocaml: follow upstream for highlights
Diffstat (limited to 'queries/ocaml')
-rw-r--r--queries/ocaml/highlights.scm12
1 files changed, 7 insertions, 5 deletions
diff --git a/queries/ocaml/highlights.scm b/queries/ocaml/highlights.scm
index e5ee92e1..6c921317 100644
--- a/queries/ocaml/highlights.scm
+++ b/queries/ocaml/highlights.scm
@@ -40,9 +40,8 @@
(let_binding pattern: (value_pattern) @variable)
(let_binding pattern: (tuple_pattern (value_pattern) @variable))
-(let_binding (parameter (label_name) @parameter))
-(let_binding (parameter (value_pattern) @parameter))
-(let_binding (parameter (typed_pattern (value_pattern) @parameter)))
+(value_pattern) @parameter
+(parameter (label_name) @parameter)
(function_type (typed_label (label_name) @parameter))
; Application
@@ -76,7 +75,7 @@
(boolean) @constant
-(number) @number
+[(number) (signed_number)] @number
[(string) (character)] @string
@@ -106,6 +105,8 @@
(infix_operator ["&" "+" "-" "=" ">" "|" "%"] @operator)
+(signed_number ["+" "-"] @operator)
+
["*" "#" "::" "<-"] @operator
; Keywords
@@ -126,6 +127,7 @@
["include" "open"] @include
["for" "to" "downto" "while" "do" "done"] @repeat
+
; Punctuation
;------------
@@ -144,7 +146,7 @@
(object_type ["<" ">"] @punctuation.bracket)
[
- "," "." ";" ":" "=" "|" "~" "?" "!" ">" "&"
+ "," "." ";" ":" "=" "|" "~" "?" "+" "-" "!" ">" "&"
"->" ";;" ":>" "+=" ":=" ".."
] @punctuation.delimiter