feat: Add ADL language support

book/src/generated/lang-support.md

@@ -1,6 +1,7 @@
 | Language | Syntax Highlighting | Treesitter Textobjects | Auto Indent | Default LSP |
 | --- | --- | --- | --- | --- |
 | ada | ✓ | ✓ |  | `ada_language_server`, `ada_language_server` |
+| adl | ✓ | ✓ | ✓ |  |
 | agda | ✓ |  |  |  |
 | astro | ✓ |  |  |  |
 | awk | ✓ | ✓ |  | `awk-language-server` |

languages.toml

@@ -3430,3 +3430,21 @@ indent = { tab-width = 2, unit = "  " }
 [[grammar]]
 name = "ohm"
 source = { git = "https://github.com/novusnota/tree-sitter-ohm", rev = "80f14f0e477ddacc1e137d5ed8e830329e3fb7a3" }
+
+[[language]]
+name = "adl"
+scope = "source.adl"
+injection-regex = "adl"
+file-types = ["adl"]
+roots = []
+comment-token = "//"
+indent = { tab-width = 2, unit = "  " }
+
+[language.auto-pairs]
+'"' = '"'
+'{' = '}'
+'<' = '>'
+
+[[grammar]]
+name = "adl"
+source = { git = "https://github.com/adl-lang/tree-sitter-adl", rev = "0399ed80b9fb88865a02259e7c11dc98de1d5ee5" }

runtime/queries/adl/highlights.scm

@@ -0,0 +1,39 @@
+; adl
+
+[
+"module"
+"struct"
+"union"
+"type"
+"newtype"
+"annotation"
+] @keyword
+
+(scoped_name) @variable
+(comment) @comment
+(doc_comment) @info
+(name) @type
+
+(ERROR) @error
+
+(fname) @property
+
+(type_expr (scoped_name) @type)
+
+(type_expr (scoped_name) @generic (type_param) @type.param)
+
+; json
+(key) @string.special.key
+
+(string) @string
+
+(number) @number
+
+[
+  (null)
+  (true)
+  (false)
+] @constant.builtin
+
+(escape_sequence) @escape
+

runtime/queries/adl/indents.scm

@@ -0,0 +1,12 @@
+[
+  (struct)
+  (union)
+
+  (array)
+  (object)
+] @indent
+
+; [
+;  "}"
+;  "]"
+; ] @outdent

runtime/queries/adl/textobjects.scm

@@ -0,0 +1 @@
+(struct (_) @function.inside) @funtion.around