summaryrefslogtreecommitdiff
path: root/queries/haskell
diff options
context:
space:
mode:
authorGuillaume Bouchard <guillaum.bouchard@gmail.com>2022-08-27 15:50:03 +0200
committerStephan Seitz <stephan.seitz@fau.de>2022-08-29 13:51:46 -0700
commit3993d90a521d58673ce4a618afc9f9bcf79b92f9 (patch)
treea1aecc1fc73de9ba14fb1c68004a9dbe05deffa7 /queries/haskell
parentf3c53d225ada93a99bfd818e1c40012400e2dc55 (diff)
Haskell injection: support inline json
Support for inline json using the quasiquoter `aesonQQ`: https://github.com/sol/aeson-qq#readme
Diffstat (limited to 'queries/haskell')
-rw-r--r--queries/haskell/injections.scm10
1 files changed, 10 insertions, 0 deletions
diff --git a/queries/haskell/injections.scm b/queries/haskell/injections.scm
index 0b231a7a..c3c51358 100644
--- a/queries/haskell/injections.scm
+++ b/queries/haskell/injections.scm
@@ -56,3 +56,13 @@
(#eq? @_name "hsx")
((quasiquote_body) @html)
)
+
+;; -----------------------------------------------------------------------------
+;; Inline JSON from aeson
+
+(quasiquote
+ (quoter) @_name
+ (#eq? @_quoter "aesonQQ")
+ ((quasiquote_body) @json)
+)
+