summaryrefslogtreecommitdiff
path: root/runtime/syntax/lisp.vim
diff options
context:
space:
mode:
authorBram Moolenaar <Bram@vim.org>2007-05-05 18:24:42 +0000
committerBram Moolenaar <Bram@vim.org>2007-05-05 18:24:42 +0000
commitc81e5e79a0f2f5c2ac1896fa51cbe47e2e2a8d97 (patch)
tree5211ea86daed8e43c3dd25458e808c3d32100097 /runtime/syntax/lisp.vim
parent9aae141a6bcfc26bcce352deb8bf34566a3e1be2 (diff)
downloadvim-c81e5e79a0f2f5c2ac1896fa51cbe47e2e2a8d97.zip
updated for version 7.1a
Diffstat (limited to 'runtime/syntax/lisp.vim')
-rw-r--r--runtime/syntax/lisp.vim19
1 files changed, 10 insertions, 9 deletions
diff --git a/runtime/syntax/lisp.vim b/runtime/syntax/lisp.vim
index 61792d110..cd800e720 100644
--- a/runtime/syntax/lisp.vim
+++ b/runtime/syntax/lisp.vim
@@ -1,8 +1,8 @@
" Vim syntax file
" Language: Lisp
" Maintainer: Dr. Charles E. Campbell, Jr. <NdrOchipS@PcampbellAfamily.Mbiz>
-" Last Change: Oct 12, 2005
-" Version: 17a
+" Last Change: Apr 12, 2007
+" Version: 19
" URL: http://mysite.verizon.net/astronaut/vim/index.html#vimlinks_syntax
"
" Thanks to F Xavier Noria for a list of 978 Common Lisp symbols
@@ -34,6 +34,8 @@ else
syn cluster lispListCluster contains=@lispBaseListCluster,lispString
endif
+syn case ignore
+
" ---------------------------------------------------------------------
" Lists: {{{1
syn match lispSymbol contained ![^()'`,"; \t]\+!
@@ -436,7 +438,7 @@ syn keyword lispVar *gensym-counter* *print-miser-width* *trace-output*
" ---------------------------------------------------------------------
" Strings: {{{1
-syn region lispString start=+"+ skip=+\\\\\|\\"+ end=+"+
+syn region lispString start=+"+ skip=+\\\\\|\\"+ end=+"+ contains=@Spell
if exists("g:lisp_instring")
syn region lispInString keepend matchgroup=Delimiter start=+"(+rs=s+1 skip=+|.\{-}|+ matchgroup=Delimiter end=+)"+ contains=@lispBaseListCluster,lispInStringString
syn region lispInStringString start=+\\"+ skip=+\\\\+ end=+\\"+ contained
@@ -454,14 +456,15 @@ syn keyword lispDecl do* flet multiple-value-bind
" Numbers: supporting integers and floating point numbers {{{1
syn match lispNumber "-\=\(\.\d\+\|\d\+\(\.\d*\)\=\)\(e[-+]\=\d\+\)\="
-syn match lispSpecial "\*[a-zA-Z_][a-zA-Z_0-9-]*\*"
+syn match lispSpecial "\*\w[a-z_0-9-]*\*"
syn match lispSpecial !#|[^()'`,"; \t]\+|#!
-syn match lispSpecial !#x[0-9a-fA-F]\+!
-syn match lispSpecial !#o[0-7]\+!
+syn match lispSpecial !#x\x\+!
+syn match lispSpecial !#o\o\+!
syn match lispSpecial !#b[01]\+!
-syn match lispSpecial !#\\[ -\~]!
+syn match lispSpecial !#\\[ -}\~]!
syn match lispSpecial !#[':][^()'`,"; \t]\+!
syn match lispSpecial !#([^()'`,"; \t]\+)!
+syn match lispSpecial !#\\\%(Space\|Newline\|Tab\|Page\|Rubout\|Linefeed\|Return\|Backspace\)!
syn match lispConcat "\s\.\s"
syn match lispParenError ")"
@@ -471,9 +474,7 @@ syn match lispParenError ")"
syn cluster lispCommentGroup contains=lispTodo,@Spell
syn match lispComment ";.*$" contains=@lispCommentGroup
syn region lispCommentRegion start="#|" end="|#" contains=lispCommentRegion,@lispCommentGroup
-syn case ignore
syn keyword lispTodo contained combak combak: todo todo:
-syn case match
" ---------------------------------------------------------------------
" Synchronization: {{{1