Unnamed repository; edit this file 'description' to name the repository.
| -rw-r--r-- | book/src/generated/lang-support.md | 2 | ||||
| -rw-r--r-- | runtime/queries/janet/indents.scm | 28 |
2 files changed, 29 insertions, 1 deletions
diff --git a/book/src/generated/lang-support.md b/book/src/generated/lang-support.md index 4586971b..7a475962 100644 --- a/book/src/generated/lang-support.md +++ b/book/src/generated/lang-support.md @@ -113,7 +113,7 @@ | ini | ✓ | | | | | | ink | ✓ | | | | | | inko | ✓ | ✓ | ✓ | ✓ | | -| janet | ✓ | | | | | +| janet | ✓ | | ✓ | | | | java | ✓ | ✓ | ✓ | | `jdtls` | | javascript | ✓ | ✓ | ✓ | ✓ | `typescript-language-server` | | jinja | ✓ | | | | | 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 |