Unnamed repository; edit this file 'description' to name the repository.
Diffstat (limited to 'runtime/queries/janet/indents.scm')
-rw-r--r--runtime/queries/janet/indents.scm28
1 files changed, 28 insertions, 0 deletions
diff --git a/runtime/queries/janet/indents.scm b/runtime/queries/janet/indents.scm
new file mode 100644
index 00000000..b37c9bb7
--- /dev/null
+++ b/runtime/queries/janet/indents.scm
@@ -0,0 +1,28 @@
+; aligns forms to the second position if there's two in a line:
+; (-> 10
+; (* 2)
+; (print))
+(par_tup_lit . (sym_lit) @first . (_) @anchor
+ (#set! "scope" "tail")
+ (#same-line? @first @anchor)
+ ; anything that doesn't match should be indented normally
+ ; from https://github.com/janet-lang/spork/blob/5601dc883535473bca28351cc6df04ed6c656c65/spork/fmt.janet#L87C12-L93C38
+ (#not-match? @first "^(fn|match|with|with-dyns|def|def-|var|var-|defn|defn-|varfn|defmacro|defmacro-|defer|edefer|loop|seq|tabseq|catseq|generate|coro|for|each|eachp|eachk|case|cond|do|defglobal|varglobal|if|when|when-let|when-with|while|with-syms|with-vars|if-let|if-not|if-with|let|short-fn|try|unless|default|forever|upscope|repeat|forv|compwhen|compif|ev/spawn|ev/do-thread|ev/spawn-thread|ev/with-deadline|label|prompt|forever)$")) @align
+
+; everything else should be indented normally:
+;
+; (let [foo 10]
+; (print foo))
+;
+; (foo
+; bar)
+(par_tup_lit . (sym_lit)) @indent
+
+; for `{}` and `[]`:
+; {:foo 10
+; :bar 20}
+(struct_lit . (_) @anchor) @align
+
+; [foo
+; bar]
+(sqr_tup_lit . (_) @anchor) @align