wyj/neovim
1
0
Fork 0
mirror of https://github.com/neovim/neovim.git synced 2024-09-17 20:58:20 -04:00
Code Issues Packages Projects Releases Wiki Activity

vim-patch:5eb9cb53d619

Browse Source 
runtime(racket): update Racket runtime files (vim/vim#13693)

This brings the included Racket runtime files to commit 43bfc87 (update
headers, 2023-12-15) of https://github.com/benknoble/vim-racket. Note
that not all files from that repository are included. (In particular,
the ftdetect script is omitted for now.)

5eb9cb53d6

Co-authored-by: D. Ben Knoble <ben.knoble+github@gmail.com>
This commit is contained in:
Christian Clason 2023-12-16 14:31:36 +01:00
parent 6b8084a6be
commit ba613d63c4
2 changed files with 18 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
runtime/indent/racket.vim
View File

@ -3,7 +3,7 @@
" Maintainer: D. Ben Knoble <ben.knoble+github@gmail.com> " Maintainer: D. Ben Knoble <ben.knoble+github@gmail.com>
" Previous Maintainer: Will Langstroth <will@langstroth.com> " Previous Maintainer: Will Langstroth <will@langstroth.com>
" URL: https://github.com/benknoble/vim-racket " URL: https://github.com/benknoble/vim-racket
" Last Change: 2022 Aug 12 " Last Change: 2023 Jul 17
if exists("b:did_indent") if exists("b:did_indent")
finish finish
@ -11,18 +11,25 @@ endif
let b:did_indent = 1 let b:did_indent = 1
setlocal lisp autoindent nosmartindent setlocal lisp autoindent nosmartindent
if has('vim9script')
setlocal indentexpr=racket#Indent() lispoptions+=expr:1
endif
setlocal lispwords+=module,module*,module+,parameterize,let-values,let*-values,letrec-values,local setlocal lispwords+=module,module*,module+,parameterize,parameterize*,let-values,let*-values,letrec-values,local
setlocal lispwords+=define/contract setlocal lispwords+=define/contract
setlocal lispwords+=λ setlocal lispwords+=λ
setlocal lispwords+=with-handlers setlocal lispwords+=with-handlers
setlocal lispwords+=define-values,opt-lambda,case-lambda,syntax-rules,with-syntax,syntax-case,syntax-parse setlocal lispwords+=define-values,opt-lambda,case-lambda,syntax-rules,with-syntax,syntax-case,syntax-parse
setlocal lispwords+=define-for-syntax,define-syntax-parser,define-syntax-parse-rule,define-syntax-class,define-splicing-syntax-class setlocal lispwords+=define-for-syntax,define-syntax-parser,define-syntax-parse-rule,define-syntax-class,define-splicing-syntax-class
setlocal lispwords+=define-syntax-parameter,syntax-parameterize
setlocal lispwords+=define-signature,unit,unit/sig,compund-unit/sig,define-values/invoke-unit/sig setlocal lispwords+=define-signature,unit,unit/sig,compund-unit/sig,define-values/invoke-unit/sig
setlocal lispwords+=define-opt/c,define-syntax-rule setlocal lispwords+=define-opt/c,define-syntax-rule
setlocal lispwords+=define-test-suite setlocal lispwords+=define-test-suite,test-case
setlocal lispwords+=struct setlocal lispwords+=struct
setlocal lispwords+=with-input-from-file,with-output-to-file setlocal lispwords+=with-input-from-file,with-output-to-file
setlocal lispwords+=begin,begin0
setlocal lispwords+=place
setlocal lispwords+=cond
" Racket OOP " Racket OOP
" TODO missing a lot of define-like forms here (e.g., define/augment, etc.) " TODO missing a lot of define-like forms here (e.g., define/augment, etc.)
@ -41,6 +48,8 @@ setlocal lispwords+=for/hash,for/hasheq,for/hasheqv,for/sum,for/flvector,for*/fl
setlocal lispwords+=for/async setlocal lispwords+=for/async
setlocal lispwords+=for/set,for*/set setlocal lispwords+=for/set,for*/set
setlocal lispwords+=for/first,for*/first setlocal lispwords+=for/first,for*/first
setlocal lispwords+=for/last,for*/last
setlocal lispwords+=for/stream,for*/stream
setlocal lispwords+=match,match*,match/values,define/match,match-lambda,match-lambda*,match-lambda** setlocal lispwords+=match,match*,match/values,define/match,match-lambda,match-lambda*,match-lambda**
setlocal lispwords+=match-let,match-let*,match-let-values,match-let*-values setlocal lispwords+=match-let,match-let*,match-let-values,match-let*-values
@ -57,4 +66,4 @@ setlocal lispwords+=if-view,case-view,cond-view,list-view,dyn-view
setlocal lispwords+=case/dep setlocal lispwords+=case/dep
setlocal lispwords+=define/obs setlocal lispwords+=define/obs
let b:undo_indent = "setlocal lisp< ai< si< lw<" let b:undo_indent = "setlocal indentexpr< lisp< lispoptions< ai< si< lw<"

9
runtime/syntax/racket.vim
View File

@ -4,7 +4,7 @@
" Previous Maintainer: Will Langstroth <will@langstroth.com> " Previous Maintainer: Will Langstroth <will@langstroth.com>
" URL: https://github.com/benknoble/vim-racket " URL: https://github.com/benknoble/vim-racket
" Description: Contains all of the keywords in #lang racket " Description: Contains all of the keywords in #lang racket
" Last Change: 2022 Aug 12 " Last Change: 2023 Sep 22
" Initializing: " Initializing:
if exists("b:current_syntax") if exists("b:current_syntax")
@ -514,13 +514,13 @@ syntax region racketString start=/\%(\\\)\@<!"/ skip=/\\[\\"]/ end=/"/ contains=
syntax region racketString start=/#"/ skip=/\\[\\"]/ end=/"/ contains=racketStringEscapeError,racketStringEscape syntax region racketString start=/#"/ skip=/\\[\\"]/ end=/"/ contains=racketStringEscapeError,racketStringEscape
if exists("racket_no_string_fold") if exists("racket_no_string_fold")
syn region racketString start=/#<<\z(.*\)$/ end=/^\z1$/ syn region racketHereString start=/#<<\z(.*\)$/ end=/^\z1$/
else else
syn region racketString start=/#<<\z(.*\)$/ end=/^\z1$/ fold syn region racketHereString start=/#<<\z(.*\)$/ end=/^\z1$/ fold
endif endif
syntax cluster racketTop add=racketError,racketConstant,racketStruc,racketString syntax cluster racketTop add=racketError,racketConstant,racketStruc,racketString,racketHereString
" Numbers " Numbers
@ -623,6 +623,7 @@ highlight default link racketFunc Function
highlight default link racketString String highlight default link racketString String
highlight default link racketStringEscape Special highlight default link racketStringEscape Special
highlight default link racketHereString String
highlight default link racketUStringEscape Special highlight default link racketUStringEscape Special
highlight default link racketStringEscapeError Error highlight default link racketStringEscapeError Error
highlight default link racketChar Character highlight default link racketChar Character