feat: add elm support

This commit is contained in:
Vincent Jousse 2024-05-15 14:54:34 +02:00 committed by Lewis Russell
parent df58c81237
commit 7068ad6d16
3 changed files with 90 additions and 1 deletions

View file

@ -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`

5
queries/elm/context.scm Normal file
View file

@ -0,0 +1,5 @@
([
(value_declaration)
(case_of_expr)
(case_of_branch)
] @context)

84
test/test.elm Normal file
View file

@ -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"