Mercurial > vim
view runtime/syntax/sather.vim @ 33938:ed2267e507ff v9.0.2165
patch 9.0.2165: Vim9: can simplify arg type checking code
Commit: https://github.com/vim/vim/commit/a8f7f92b56b42ea6a568eca889c48091f47fb429
Author: Ernie Rael <errael@raelity.com>
Date: Thu Dec 14 20:17:04 2023 +0100
patch 9.0.2165: Vim9: can simplify arg type checking code
Problem: Vim9: can simplify arg type checking code
Solution: In `f_argcheck` array use `arg_any`, instead of NULL
closes: #13674
Signed-off-by: Ernie Rael <errael@raelity.com>
Signed-off-by: Christian Brabandt <cb@256bit.org>
| author | Christian Brabandt <cb@256bit.org> |
|---|---|
| date | Thu, 14 Dec 2023 20:30:04 +0100 |
| parents | 46763b01cd9a |
| children |
line wrap: on
line source
" Vim syntax file " Language: Sather/pSather " Maintainer: Claudio Fleiner <claudio@fleiner.com> " URL: http://www.fleiner.com/vim/syntax/sather.vim " Last Change: 2003 May 11 " Sather is a OO-language developped at the International Computer Science " Institute (ICSI) in Berkeley, CA. pSather is a parallel extension to Sather. " Homepage: http://www.icsi.berkeley.edu/~sather " Sather files use .sa as suffix " quit when a syntax file was already loaded if exists("b:current_syntax") finish endif " keyword definitions syn keyword satherExternal extern syn keyword satherBranch break continue syn keyword satherLabel when then syn keyword satherConditional if else elsif end case typecase assert with syn match satherConditional "near$" syn match satherConditional "far$" syn match satherConditional "near *[^(]"he=e-1 syn match satherConditional "far *[^(]"he=e-1 syn keyword satherSynchronize lock guard sync syn keyword satherRepeat loop parloop do syn match satherRepeat "while!" syn match satherRepeat "break!" syn match satherRepeat "until!" syn keyword satherBoolValue true false syn keyword satherValue self here cluster syn keyword satherOperator new "== != & ^ | && || syn keyword satherOperator and or not syn match satherOperator "[#!]" syn match satherOperator ":-" syn keyword satherType void attr where syn match satherType "near *("he=e-1 syn match satherType "far *("he=e-1 syn keyword satherStatement return syn keyword satherStorageClass static const syn keyword satherExceptions try raise catch syn keyword satherMethodDecl is pre post syn keyword satherClassDecl abstract value class include syn keyword satherScopeDecl public private readonly syn match satherSpecial contained "\\\d\d\d\|\\." syn region satherString start=+"+ skip=+\\\\\|\\"+ end=+"+ contains=satherSpecial syn match satherCharacter "'[^\\]'" syn match satherSpecialCharacter "'\\.'" syn match satherNumber "-\=\<\d\+L\=\>\|0[xX][0-9a-fA-F]\+\>" syn match satherCommentSkip contained "^\s*\*\($\|\s\+\)" syn region satherComment2String contained start=+"+ skip=+\\\\\|\\"+ end=+$\|"+ contains=satherSpecial syn match satherComment "--.*" contains=satherComment2String,satherCharacter,satherNumber syn sync ccomment satherComment " Define the default highlighting. " Only when an item doesn't have highlighting yet hi def link satherBranch satherStatement hi def link satherLabel satherStatement hi def link satherConditional satherStatement hi def link satherSynchronize satherStatement hi def link satherRepeat satherStatement hi def link satherExceptions satherStatement hi def link satherStorageClass satherDeclarative hi def link satherMethodDecl satherDeclarative hi def link satherClassDecl satherDeclarative hi def link satherScopeDecl satherDeclarative hi def link satherBoolValue satherValue hi def link satherSpecial satherValue hi def link satherString satherValue hi def link satherCharacter satherValue hi def link satherSpecialCharacter satherValue hi def link satherNumber satherValue hi def link satherStatement Statement hi def link satherOperator Statement hi def link satherComment Comment hi def link satherType Type hi def link satherValue String hi def link satherString String hi def link satherSpecial String hi def link satherCharacter String hi def link satherDeclarative Type hi def link satherExternal PreCondit let b:current_syntax = "sather" " vim: ts=8