From 1aebc12090162041cd095aab8368cea7db8b3e5a Mon Sep 17 00:00:00 2001
From: Vincent Jousse <vincent@jousse.org>
Date: Wed, 15 May 2024 14:54:34 +0200
Subject: [PATCH] feat: add elm support

---
 README.md               |  2 +-
 queries/elm/context.scm |  5 +++
 test/test.elm           | 84 +++++++++++++++++++++++++++++++++++++++++
 3 files changed, 90 insertions(+), 1 deletion(-)
 create mode 100644 queries/elm/context.scm
 create mode 100644 test/test.elm

diff --git a/README.md b/README.md
index 68c98d09..2c424c39 100644
--- a/README.md
+++ b/README.md
@@ -30,6 +30,7 @@ Note: if you need support for Neovim 0.6.x please use the tag `compat/0.6`.
   - [x] `d`
   - [x] `dart`
   - [x] `elixir`
+  - [x] `elm`
   - [x] `fennel`
   - [x] `fish`
   - [x] `fortran`
@@ -109,7 +110,6 @@ Note: if you need support for Neovim 0.6.x please use the tag `compat/0.6`.
   - [ ] `ebnf`
   - [ ] `ecma`
   - [ ] `eex`
-  - [ ] `elm`
   - [ ] `elsa`
   - [ ] `elvish`
   - [ ] `embedded_template`
diff --git a/queries/elm/context.scm b/queries/elm/context.scm
new file mode 100644
index 00000000..f7600c49
--- /dev/null
+++ b/queries/elm/context.scm
@@ -0,0 +1,5 @@
+([
+  (value_declaration)
+  (case_of_expr)
+  (case_of_branch)
+] @context)
diff --git a/test/test.elm b/test/test.elm
new file mode 100644
index 00000000..8331e9aa
--- /dev/null
+++ b/test/test.elm
@@ -0,0 +1,84 @@
+module Test exposing (..)
+
+import Html exposing (div, text)
+
+
+main : Html.Html msg
+main =
+    let
+        test =
+            "Test content"
+    in
+    case test of
+        "Hello" ->
+            div []
+                [ text "Hello, World!"
+                , -- Generate some lines
+                  -- Generate some lines
+                  -- Generate some lines
+                  -- Generate some lines
+                  -- Generate some lines
+                  -- Generate some lines
+                  -- Generate some lines
+                  -- Generate some lines
+                  -- Generate some lines
+                  -- Generate some lines
+                  -- Generate some lines
+                  -- Generate some lines
+                  -- Generate some lines
+                  -- Generate some lines
+                  -- Generate some lines
+                  -- Generate some lines
+                  -- Generate some lines
+                  -- Generate some lines
+                  -- Generate some lines
+                  -- Generate some lines
+                  -- Generate some lines
+                  -- Generate some lines
+                  -- Generate some lines
+                  -- Generate some lines
+                  div []
+                    [ text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    , text "Some more lines"
+                    ]
+                ]
+
+        _ ->
+            text "Default"