Add support for typstyle (#313)

Formatter for typst

https://github.com/Enter-tainer/typstyle

Co-authored-by: Radon Rosborough <radon@intuitiveexplanations.com>

CHANGELOG.md

@@ -5,6 +5,8 @@ The format is based on [Keep a Changelog].
 
 ## Unreleased
 ### Formatters
+* [`typstyle`](https://github.com/Enter-tainer/typstyle) for
+  [typst](https://typst.app/) ([#313]).
 * [`rubocop`](https://github.com/rubocop/rubocop) changed to use `-a`
   instead of deprecated `--auto-correct` ([#316]).
 
@@ -22,6 +24,7 @@ The format is based on [Keep a Changelog].
   write tests that have additional data files ([#301]).
 
 [#301]: https://github.com/radian-software/apheleia/pull/301
+[#313]: https://github.com/radian-software/apheleia/pull/313
 [#316]: https://github.com/radian-software/apheleia/pull/316
 
 ## 4.2 (released 2024-08-03)

apheleia-formatters.el

@@ -194,6 +194,7 @@
     (rustfmt . ("rustfmt" "--quiet" "--emit" "stdout"))
     (terraform . ("terraform" "fmt" "-"))
     (treefmt . ("treefmt" "--stdin" filepath))
+    (typstyle . ("typstyle"))
     (xmllint . ("xmllint" "--format" "-"))
     (yapf . ("yapf"))
     (yq-csv . ("yq" "--prettyPrint" "--no-colors"
@@ -364,6 +365,8 @@ rather than using this system."
     (tuareg-mode . ocamlformat)
     (typescript-mode . prettier-typescript)
     (typescript-ts-mode . prettier-typescript)
+    (typst-mode . typstyle)
+    (typst-ts-mode . typstyle)
     (web-mode . prettier)
     (yaml-mode . prettier-yaml)
     (yaml-ts-mode . prettier-yaml)

test/formatters/installers/typstyle.bash

@@ -0,0 +1,4 @@
+ver="$(latest_release Enter-tainer/typstyle)"
+
+wget "https://github.com/Enter-tainer/typstyle/releases/download/${ver}/typstyle-x86_64-unknown-linux-gnu " -O /usr/local/bin/typstyle
+chmod +x /usr/local/bin/typstyle

test/formatters/samplecode/typstyle/in.typ

@@ -0,0 +1,10 @@
+#{
+    let (title,
+        _) = query(heading.where(level:
+        1)).map(e => (
+    e.body,
+      e.location()
+          .page(),
+        )).rev().find(((_, v)) => v
+        <= page)
+}

test/formatters/samplecode/typstyle/out.typ

@@ -0,0 +1,9 @@
+#{
+  let (title, _) = query(heading.where(level: 1))
+    .map(e => (
+        e.body,
+        e.location().page(),
+      ))
+    .rev()
+    .find(((_, v)) => v <= page)
+}