Mercurial > vim
view runtime/ftplugin/pascal.vim @ 34207:5aee5855ccfe v9.1.0052
patch 9.1.0052: Patch 9.1.0041 causes regressions for users
Commit: https://github.com/vim/vim/commit/fa8c9715587a24562dd755c44dc13aef43d7d875
Author: Christian Brabandt <cb@256bit.org>
Date: Thu Jan 25 20:50:49 2024 +0100
patch 9.1.0052: Patch 9.1.0041 causes regressions for users
Problem: Patch 9.1.0041 causes regressions for users
(Gleb Fotengauer-Malinovskiy)
Solution: Revert 9.1.0041 and restore old behaviour
Revert "patch 9.1.0041: xxd -i may generate incorrect C statements"
This reverts commit 7062be13129985fe297b9a8e59c57b8f0db61b8f.
Signed-off-by: Christian Brabandt <cb@256bit.org>
author | Christian Brabandt <cb@256bit.org> |
---|---|
date | Thu, 25 Jan 2024 21:00:05 +0100 |
parents | 8ae680be2a51 |
children | 7c7432a53a6c |
line wrap: on
line source
" Vim filetype plugin file " Language: Pascal " Maintainer: Doug Kearns <dougkearns@gmail.com> " Previous Maintainer: Dan Sharp " Last Change: 2024 Jan 14 if exists("b:did_ftplugin") | finish | endif let b:did_ftplugin = 1 let s:cpo_save = &cpo set cpo&vim set comments=s:(*,m:\ ,e:*),s:{,m:\ ,e:} set commentstring={%s} if exists("pascal_delphi") set comments+=:/// endif if !exists("pascal_traditional") set commentstring=//\ %s set comments+=:// endif setlocal formatoptions-=t formatoptions+=croql if exists("loaded_matchit") let b:match_ignorecase = 1 " (Pascal is case-insensitive) let b:match_words = '\<\%(asm\|begin\|case\|\%(\%(=\|packed\)\s*\)\@<=\%(class\|object\)\|\%(=\s*\)\@<=interface\|record\|try\)\>' let b:match_words .= ':\%(^\s*\)\@<=\%(except\|finally\|else\|otherwise\)\>' let b:match_words .= ':\<end\>\.\@!' let b:match_words .= ',\<repeat\>:\<until\>' " let b:match_words .= ',\<if\>:\<else\>' " FIXME - else clashing with middle else. It seems like a debatable use anyway. let b:match_words .= ',\<unit\>:\<\%(\%(^\s*\)\@<=interface\|implementation\|initialization\|finalization\)\>:\<end\.' endif if (has("gui_win32") || has("gui_gtk")) && !exists("b:browsefilter") let b:browsefilter = "Pascal Source Files (*.pas, *.pp, *.inc)\t*.pas;*.pp;*.inc\n" if has("win32") let b:browsefilter ..= "All Files (*.*)\t*\n" else let b:browsefilter ..= "All Files (*)\t*\n" endif endif let b:undo_ftplugin = "setl fo< cms< com< " .. \ "| unlet! b:browsefilter b:match_words b:match_ignorecase" let &cpo = s:cpo_save unlet s:cpo_save " vim: nowrap sw=2 sts=2 ts=8 noet: