From 93f20a6d23fa9969906fe4f05277d44c27a79b8e Mon Sep 17 00:00:00 2001 From: timput Date: Sun, 2 Nov 2025 07:53:50 -0700 Subject: [PATCH] add initial haskell-tags.scm for repomap --- aider/queries/tree-sitter-languages/haskell-tags.scm | 3 +++ tests/basic/test_repomap.py | 3 +++ tests/fixtures/languages/haskell/test.hs | 7 +++++++ 3 files changed, 13 insertions(+) create mode 100644 aider/queries/tree-sitter-languages/haskell-tags.scm create mode 100644 tests/fixtures/languages/haskell/test.hs diff --git a/aider/queries/tree-sitter-languages/haskell-tags.scm b/aider/queries/tree-sitter-languages/haskell-tags.scm new file mode 100644 index 000000000..f5c073750 --- /dev/null +++ b/aider/queries/tree-sitter-languages/haskell-tags.scm @@ -0,0 +1,3 @@ +(function (variable) @name.definition.function) +(bind (variable) @name.definition.function) +(signature (variable) @name.definition.type) diff --git a/tests/basic/test_repomap.py b/tests/basic/test_repomap.py index 185e6e62d..035c7c31c 100644 --- a/tests/basic/test_repomap.py +++ b/tests/basic/test_repomap.py @@ -302,6 +302,9 @@ class TestRepoMapAllLanguages(unittest.TestCase): def test_language_gleam(self): self._test_language_repo_map("gleam", "gleam", "greet") + def test_language_haskell(self): + self._test_language_repo_map("haskell", "hs", "add") + def test_language_java(self): self._test_language_repo_map("java", "java", "Greeting") diff --git a/tests/fixtures/languages/haskell/test.hs b/tests/fixtures/languages/haskell/test.hs new file mode 100644 index 000000000..890ff94b7 --- /dev/null +++ b/tests/fixtures/languages/haskell/test.hs @@ -0,0 +1,7 @@ +module Main where + +add :: Int -> Int -> Int +add a b = a + b + +main :: IO () +main = print (add 2 3)