Mercurial > vim
view runtime/syntax/esterel.vim @ 34665:ca2da8e8fb53 v9.1.0215
patch 9.1.0215: Half-page scrolling does not support smooth-scrolling
Commit: https://github.com/vim/vim/commit/5a2e3ec9ac72b6e644fea4ebba7e632498296e2f
Author: Luuk van Baal <luukvbaal@gmail.com>
Date: Thu Mar 28 10:07:29 2024 +0100
patch 9.1.0215: Half-page scrolling does not support smooth-scrolling
Problem: Page-wise scrolling with Ctrl-D/Ctrl-U implements
it's own logic to change the topline and cursor.
More logic than necessary for scrolling with Ctrl-F/Ctrl-B
was removed in patch 9.1.0211.
Solution: Re-use the logic from Ctrl-E/Ctrl-Y/Ctrl-F/Ctrl-B while
staying backward compatible as much as possible.
Restore some of the logic that determined how many lines will
be scrolled (Luuk van Baal)
closes: #14316
Signed-off-by: Luuk van Baal <luukvbaal@gmail.com>
Signed-off-by: Christian Brabandt <cb@256bit.org>
author | Christian Brabandt <cb@256bit.org> |
---|---|
date | Thu, 28 Mar 2024 10:15:08 +0100 |
parents | 46763b01cd9a |
children |
line wrap: on
line source
" Vim syntax file " Language: ESTEREL " Maintainer: Maurizio Tranchero <maurizio.tranchero@polito.it> - <maurizio.tranchero@gmail.com> " Credits: Luca Necchi <luca.necchi@polito.it>, Nikos Andrikos <nick.andrik@gmail.com> " First Release: Tue May 17 23:49:39 CEST 2005 " Last Change: Tue May 6 13:29:56 CEST 2008 " Version: 0.8 " quit when a syntax file was already loaded if exists("b:current_syntax") finish endif " case is significant syn case ignore " Esterel Regions syn region esterelModule start=/module/ end=/end module/ contains=ALLBUT,esterelModule syn region esterelLoop start=/loop/ end=/end loop/ contains=ALLBUT,esterelModule syn region esterelAbort start=/abort/ end=/when/ contains=ALLBUT,esterelModule syn region esterelAbort start=/weak abort/ end=/when/ contains=ALLBUT,esterelModule syn region esterelEvery start=/every/ end=/end every/ contains=ALLBUT,esterelModule syn region esterelIf start=/if/ end=/end if/ contains=ALLBUT,esterelModule syn region esterelConcurrent transparent start=/\[/ end=/\]/ contains=ALLBUT,esterelModule syn region esterelIfThen start=/if/ end=/then/ oneline " Esterel Keywords syn keyword esterelIO input output inputoutput constant syn keyword esterelBoolean and or not xor xnor nor nand syn keyword esterelExpressions mod pre syn keyword esterelStatement nothing halt syn keyword esterelStatement module signal sensor end syn keyword esterelStatement every do loop abort weak syn keyword esterelStatement emit present await syn keyword esterelStatement pause when immediate syn keyword esterelStatement if then else case syn keyword esterelStatement var in run suspend syn keyword esterelStatement repeat times combine with syn keyword esterelStatement assert sustain " check what it is the following syn keyword esterelStatement relation syn keyword esterelFunctions function procedure task syn keyword esterelSysCall call trap exit exec " Esterel Types syn keyword esterelType integer float bolean " Esterel Comment syn match esterelComment "%.*$" " Operators and special characters syn match esterelSpecial ":" syn match esterelSpecial "<=" syn match esterelSpecial ">=" syn match esterelSpecial "+" syn match esterelSpecial "-" syn match esterelSpecial "=" syn match esterelSpecial ";" syn match esterelSpecial "/" syn match esterelSpecial "?" syn match esterelOperator "\[" syn match esterelOperator "\]" syn match esterelOperator ":=" syn match esterelOperator "||" syn match esterelStatement "\<\(if\|else\)\>" syn match esterelNone "\<else\s\+if\>$" syn match esterelNone "\<else\s\+if\>\s" " Class Linking hi def link esterelStatement Statement hi def link esterelType Type hi def link esterelComment Comment hi def link esterelBoolean Number hi def link esterelExpressions Number hi def link esterelIO String hi def link esterelOperator Type hi def link esterelSysCall Type hi def link esterelFunctions Type hi def link esterelSpecial Special let b:current_syntax = "esterel"