Mercurial > vim
view runtime/syntax/elm.vim @ 24458:1d126cb683c1 v8.2.2769
patch 8.2.2769: Modula-3 config files are not recognized
Commit: https://github.com/vim/vim/commit/6bc00699c5049c40761d212bef1b490e2af7944c
Author: Bram Moolenaar <Bram@vim.org>
Date: Thu Apr 15 14:29:17 2021 +0200
patch 8.2.2769: Modula-3 config files are not recognized
Problem: Modula-3 config files are not recognized.
Solution: Add filetype patterns. (Doug Kearns)
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Thu, 15 Apr 2021 14:30:04 +0200 |
parents | 661eb972cb22 |
children |
line wrap: on
line source
" Vim syntax file " Language: Elm " Maintainer: Andreas Scharf <as@99n.de> " Original Author: Joseph Hager <ajhager@gmail.com> " Copyright: Joseph Hager <ajhager@gmail.com> " License: BSD3 " Latest Revision: 2020-05-29 if exists('b:current_syntax') finish endif " Keywords syn keyword elmConditional else if of then case syn keyword elmAlias alias syn keyword elmTypedef contained type port syn keyword elmImport exposing as import module where " Operators " elm/core syn match elmOperator contained "\(<|\||>\|||\|&&\|==\|/=\|<=\|>=\|++\|::\|+\|-\|*\|/\|//\|^\|<>\|>>\|<<\|<\|>\|%\)" " elm/parser syn match elmOperator contained "\(|.\||=\)" " elm/url syn match elmOperator contained "\(</>\|<?>\)" " Types syn match elmType "\<[A-Z][0-9A-Za-z_-]*" syn keyword elmNumberType number " Modules syn match elmModule "\<\([A-Z][0-9A-Za-z_'-\.]*\)\+\.[A-Za-z]"me=e-2 syn match elmModule "^\(module\|import\)\s\+[A-Z][0-9A-Za-z_'-\.]*\(\s\+as\s\+[A-Z][0-9A-Za-z_'-\.]*\)\?\(\s\+exposing\)\?" contains=elmImport " Delimiters syn match elmDelimiter "[,;]" syn match elmBraces "[()[\]{}]" " Functions syn match elmTupleFunction "\((,\+)\)" " Comments syn keyword elmTodo TODO FIXME XXX contained syn match elmLineComment "--.*" contains=elmTodo,@spell syn region elmComment matchgroup=elmComment start="{-|\=" end="-}" contains=elmTodo,elmComment,@spell fold " Strings syn match elmStringEscape "\\u[0-9a-fA-F]\{4}" contained syn match elmStringEscape "\\[nrfvbt\\\"]" contained syn region elmString start="\"" skip="\\\"" end="\"" contains=elmStringEscape,@spell syn region elmTripleString start="\"\"\"" skip="\\\"" end="\"\"\"" contains=elmStringEscape,@spell syn match elmChar "'[^'\\]'\|'\\.'\|'\\u[0-9a-fA-F]\{4}'" " Lambda syn region elmLambdaFunc start="\\"hs=s+1 end="->"he=e-2 " Debug syn match elmDebug "Debug.\(log\|todo\|toString\)" " Numbers syn match elmInt "-\?\<\d\+\>" syn match elmFloat "-\?\(\<\d\+\.\d\+\>\)" " Identifiers syn match elmTopLevelDecl "^\s*[a-zA-Z][a-zA-z0-9_]*\('\)*\s\+:\(\r\n\|\r\|\n\|\s\)\+" contains=elmOperator syn match elmFuncName /^\l\w*/ " Folding syn region elmTopLevelTypedef start="type" end="\n\(\n\n\)\@=" contains=ALL fold syn region elmTopLevelFunction start="^[a-zA-Z].\+\n[a-zA-Z].\+=" end="^\(\n\+\)\@=" contains=ALL fold syn region elmCaseBlock matchgroup=elmCaseBlockDefinition start="^\z\(\s\+\)\<case\>" end="^\z1\@!\W\@=" end="\(\n\n\z1\@!\)\@=" end="\n\z1\@!\(\n\n\)\@=" contains=ALL fold syn region elmCaseItemBlock start="^\z\(\s\+\).\+->$" end="^\z1\@!\W\@=" end="\(\n\n\z1\@!\)\@=" end="\(\n\z1\S\)\@=" contains=ALL fold syn region elmLetBlock matchgroup=elmLetBlockDefinition start="\<let\>" end="\<in\>" contains=ALL fold hi def link elmFuncName Function hi def link elmCaseBlockDefinition Conditional hi def link elmCaseBlockItemDefinition Conditional hi def link elmLetBlockDefinition TypeDef hi def link elmTopLevelDecl Function hi def link elmTupleFunction Normal hi def link elmTodo Todo hi def link elmComment Comment hi def link elmLineComment Comment hi def link elmString String hi def link elmTripleString String hi def link elmChar String hi def link elmStringEscape Special hi def link elmInt Number hi def link elmFloat Float hi def link elmDelimiter Delimiter hi def link elmBraces Delimiter hi def link elmTypedef TypeDef hi def link elmImport Include hi def link elmConditional Conditional hi def link elmAlias Delimiter hi def link elmOperator Operator hi def link elmType Type hi def link elmNumberType Identifier hi def link elmLambdaFunc Function hi def link elmDebug Debug hi def link elmModule Type syn sync minlines=500 let b:current_syntax = 'elm'