runtime/queries/haskell/injections.scm


1
2
3
4
5
6
7
8
9
10
11
12
13
14

((comment) @injection.content
 (#set! injection.language "comment"))

(quasiquote
 (quoter) @_quoter
 ((quasiquote_body) @injection.content
  (#match? @_quoter "(persistWith|persistLowerCase|persistUpperCase)")
  (#set! injection.language "haskell-persistent")
 )
)

(quasiquote
 (quoter) @injection.language
 (quasiquote_body) @injection.content)