feat: add Gleam lang support

aider/queries/tree-sitter-languages/README.md

@@ -1,7 +1,6 @@
-
 # Credits
 
-Aider uses modified versions of the tags.scm files from these open source 
+Aider uses modified versions of the tags.scm files from these open source
 tree-sitter language implementations:
 
 * [https://github.com/tree-sitter/tree-sitter-c](https://github.com/tree-sitter/tree-sitter-c) — licensed under the MIT License.
@@ -10,6 +9,7 @@ tree-sitter language implementations:
 * [https://github.com/Wilfred/tree-sitter-elisp](https://github.com/Wilfred/tree-sitter-elisp) — licensed under the MIT License.
 * [https://github.com/elixir-lang/tree-sitter-elixir](https://github.com/elixir-lang/tree-sitter-elixir) — licensed under the Apache License, Version 2.0.
 * [https://github.com/elm-tooling/tree-sitter-elm](https://github.com/elm-tooling/tree-sitter-elm) — licensed under the MIT License.
+* [https://github.com/gleam-lang/tree-sitter-gleam](https://github.com/gleam-lang/tree-sitter-gleam) — licensed under the Apache License, Version 2.0.
 * [https://github.com/tree-sitter/tree-sitter-go](https://github.com/tree-sitter/tree-sitter-go) — licensed under the MIT License.
 * [https://github.com/tree-sitter/tree-sitter-java](https://github.com/tree-sitter/tree-sitter-java) — licensed under the MIT License.
 * [https://github.com/tree-sitter/tree-sitter-javascript](https://github.com/tree-sitter/tree-sitter-javascript) — licensed under the MIT License.

aider/queries/tree-sitter-languages/gleam-tags.scm

@@ -0,0 +1,41 @@
+; Modules
+(module) @name @reference.module
+(import alias: (identifier) @name) @reference.module
+(remote_type_identifier
+  module: (identifier) @name) @reference.module
+((field_access
+  record: (identifier) @name)
+ (#is-not? local)) @reference.module
+
+; Functions
+(function
+  name: (identifier) @name) @definition.function
+(external_function
+  name: (identifier) @name) @definition.function
+(unqualified_import (identifier) @name) @reference.function
+((function_call
+   function: (identifier) @name) @reference.function
+ (#is-not? local))
+((field_access
+  record: (identifier) @ignore
+  field: (label) @name)
+ (#is-not? local)) @reference.function
+((binary_expression
+   operator: "|>"
+   right: (identifier) @name)
+ (#is-not? local)) @reference.function
+
+; Types
+(type_definition
+  (type_name
+    name: (type_identifier) @name)) @definition.type
+(type_definition
+  (data_constructors
+    (data_constructor
+      name: (constructor_name) @name))) @definition.constructor
+(external_type
+  (type_name
+    name: (type_identifier) @name)) @definition.type
+
+(type_identifier) @name @reference.type
+(constructor_name) @name @reference.constructor

aider/website/docs/languages.md

@@ -71,6 +71,7 @@ cog.out(get_supported_languages_md())
 | erlang               | .erl                 |          |   ✓    |
 | go                   | .go                  |    ✓     |   ✓    |
 | gomod                | .gomod               |          |   ✓    |
+| gleam                | .gleam               |    ✓     |   ✓    |
 | hack                 | .hack                |          |   ✓    |
 | haskell              | .hs                  |          |   ✓    |
 | hcl                  | .hcl                 |    ✓     |   ✓    |

tests/basic/test_repomap.py

@@ -304,6 +304,7 @@ def test_get_repo_map_all_languages(self):
             "elm": ("elm", "Person"),
             "go": ("go", "Greeter"),
             "hcl": ("tf", "aws_vpc"),
+            "gleam": ("gleam", "greeter"),
         }
 
         fixtures_dir = Path(__file__).parent.parent / "fixtures" / "languages"

tests/fixtures/languages/gleam/test.gleam

@@ -0,0 +1,5 @@
+import gleam/io
+
+pub fn greeter(name) {
+  io.println("Hello, " <> name <> "!")
+}