1
0
mirror of https://github.com/SpaceVim/SpaceVim.git synced 2025-01-24 09:40:06 +08:00
SpaceVim/bundle/nvim-treesitter/queries/ocaml/indents.scm

70 lines
1.4 KiB
Scheme

[
(let_binding) ; let = ...
(type_binding)
(external)
(record_declaration) ; { foo: bar ... }
(structure) ; struct ... end
(signature) ; sig ... end
(value_specification) ; val x: bar
(do_clause) ; do ... done
(match_case)
(field_expression)
(application_expression)
(parenthesized_expression) ; ( ... )
(record_expression) ; { foo = bar ... }
(list_expression) ; [...;...]
(try_expression) ; try ... with
] @indent.begin
; handle if-else if-else case
(if_expression
condition: (_) @indent.begin)
(then_clause) @indent.begin
((else_clause
(_) @_not_if) @indent.begin
(#not-has-type? @_not_if if_expression))
((parameter) @indent.begin
(#set! indent.start_at_same_line))
(_ (ERROR) @indent.begin
(#set! indent.start_at_same_line))
(ERROR "|" @indent.begin
(#set! indent.start_at_same_line))
(try_expression
"with" @indent.branch
[
(match_case) @indent.dedent
(match_case
[
(parenthesized_expression)
(list_expression)
] @indent.dedent)
]
)
[
"}"
] @indent.branch @indent.end
(list_expression "]" @indent.branch)
(parenthesized_expression ")" @indent.branch)
";;" @indent.end
(do_clause "done" @indent.end @indent.branch)
(structure "end" @indent.end @indent.branch)
(signature "end" @indent.end @indent.branch)
[
(string)
(comment)
] @indent.auto