mirror of
https://github.com/neovim/neovim.git
synced 2025-10-21 09:12:07 +00:00
@@ -1,8 +1,8 @@
|
||||
" Vim syntax file
|
||||
" Language: Lisp
|
||||
" Maintainer: Charles E. Campbell <NcampObell@SdrPchip.AorgM-NOSPAM>
|
||||
" Last Change: Jul 11, 2019
|
||||
" Version: 30
|
||||
" Last Change: Nov 10, 2021
|
||||
" Version: 31
|
||||
" URL: http://www.drchip.org/astronaut/vim/index.html#SYNTAX_LISP
|
||||
"
|
||||
" Thanks to F Xavier Noria for a list of 978 Common Lisp symbols taken from HyperSpec
|
||||
@@ -54,20 +54,20 @@ if exists("g:lisp_rainbow") && g:lisp_rainbow != 0
|
||||
syn region lispParen8 contained matchgroup=hlLevel8 start="`\=(" end=")" skip="|.\{-}|" contains=@lispListCluster,lispParen9
|
||||
syn region lispParen9 contained matchgroup=hlLevel9 start="`\=(" end=")" skip="|.\{-}|" contains=@lispListCluster,lispParen0
|
||||
else
|
||||
syn region lispList matchgroup=lispParen start="(" skip="|.\{-}|" matchgroup=lispParen end=")" contains=@lispListCluster
|
||||
syn region lispBQList matchgroup=PreProc start="`(" skip="|.\{-}|" matchgroup=PreProc end=")" contains=@lispListCluster
|
||||
syn region lispList matchgroup=lispParen start="(" skip="|.\{-}|" matchgroup=lispParen end=")" contains=@lispListCluster
|
||||
syn region lispBQList matchgroup=PreProc start="`(" skip="|.\{-}|" matchgroup=PreProc end=")" contains=@lispListCluster
|
||||
endif
|
||||
|
||||
" ---------------------------------------------------------------------
|
||||
" Atoms: {{{1
|
||||
syn match lispAtomMark "'"
|
||||
syn match lispAtom "'("me=e-1 contains=lispAtomMark nextgroup=lispAtomList
|
||||
syn match lispAtom "'[^ \t()]\+" contains=lispAtomMark
|
||||
syn match lispAtomBarSymbol !'|..\{-}|! contains=lispAtomMark
|
||||
syn region lispAtom start=+'"+ skip=+\\"+ end=+"+
|
||||
syn region lispAtomList contained matchgroup=Special start="(" skip="|.\{-}|" matchgroup=Special end=")" contains=@lispAtomCluster,lispString,lispEscapeSpecial
|
||||
syn match lispAtomNmbr contained "\<\d\+"
|
||||
syn match lispLeadWhite contained "^\s\+"
|
||||
syn match lispAtomMark "'"
|
||||
syn match lispAtom "'("me=e-1 contains=lispAtomMark nextgroup=lispAtomList
|
||||
syn match lispAtom "'[^ \t()]\+" contains=lispAtomMark
|
||||
syn match lispAtomBarSymbol !'|..\{-}|! contains=lispAtomMark
|
||||
syn region lispAtom start=+'"+ skip=+\\"+ end=+"+
|
||||
syn region lispAtomList contained matchgroup=Special start="(" skip="|.\{-}|" matchgroup=Special end=")" contains=@lispAtomCluster,lispString,lispEscapeSpecial
|
||||
syn match lispAtomNmbr contained "\<\d\+"
|
||||
syn match lispLeadWhite contained "^\s\+"
|
||||
|
||||
" ---------------------------------------------------------------------
|
||||
" Standard Lisp Functions and Macros: {{{1
|
||||
@@ -553,6 +553,8 @@ syn match lispParenError ")"
|
||||
syn cluster lispCommentGroup contains=lispTodo,@Spell
|
||||
syn match lispComment ";.*$" contains=@lispCommentGroup
|
||||
syn region lispCommentRegion start="#|" end="|#" contains=lispCommentRegion,@lispCommentGroup
|
||||
syn region lispComment start="#+nil" end="\ze)" contains=@lispCommentGroup
|
||||
syn match lispComment '^\s*#+nil.*$' contains=@lispCommentGroup
|
||||
syn keyword lispTodo contained combak combak: todo todo:
|
||||
|
||||
" ---------------------------------------------------------------------
|
||||
|
Reference in New Issue
Block a user