Adding Roc language linters and fixers. (#4966)

* `roc_language_server`

* `roc format`

* `roc format annotate`

autoload/ale/fix/registry.vim

@@ -722,6 +722,16 @@ let s:default_registry = {
 \       'suggested_filetypes': ['typst'],
 \       'description': 'A formatter for Typst files',
 \   },
+\   'roc_format': {
+\       'function': 'ale#fixers#roc_format#Fix',
+\       'suggested_filetypes': ['roc'],
+\       'description': 'Formats Roc files.',
+\   },
+\   'roc_annotate': {
+\       'function': 'ale#fixers#roc_annotate#Fix',
+\       'suggested_filetypes': ['roc'],
+\       'description': 'Annotates all top-level definitions in Roc files.',
+\   },
 \}
 
 " Reset the function registry to the default entries.

autoload/ale/fixers/roc_annotate.vim

@@ -0,0 +1,21 @@
+" Author: Benjamin Block <https://github.com/benjamindblock>
+" Description: Official type annotation tool for Roc.
+
+call ale#Set('roc_roc_annotate_executable', 'roc')
+call ale#Set('roc_roc_annotate_options', '')
+
+function! ale#fixers#roc_annotate#Fix(buffer) abort
+    let l:executable = ale#Var(a:buffer, 'roc_roc_annotate_executable')
+    let l:command = l:executable . ' format annotate'
+    let l:options = ale#Var(a:buffer, 'roc_roc_annotate_options')
+
+    if l:options isnot# ''
+        let l:command .= ' ' . l:options
+    endif
+
+    return {
+    \   'command': l:command . ' %t',
+    \   'read_temporary_file': 1,
+    \}
+endfunction
+

autoload/ale/fixers/roc_format.vim

@@ -0,0 +1,20 @@
+" Author: Benjamin Block <https://github.com/benjamindblock>
+" Description: Official formatter for Roc.
+
+call ale#Set('roc_roc_format_executable', 'roc')
+call ale#Set('roc_roc_format_options', '')
+
+function! ale#fixers#roc_format#Fix(buffer) abort
+    let l:executable = ale#Var(a:buffer, 'roc_roc_format_executable')
+    let l:command = l:executable . ' format'
+    let l:options = ale#Var(a:buffer, 'roc_roc_format_options')
+
+    if l:options isnot# ''
+        let l:command .= ' ' . l:options
+    endif
+
+    return {
+    \   'command': l:command . ' %t',
+    \   'read_temporary_file': 1,
+    \}
+endfunction