view runtime/ftplugin/qb64.vim @ 29263:8408ffd9af69 v8.2.5150

patch 8.2.5150: read past the end of the first line with ":0;'{" Commit: https://github.com/vim/vim/commit/f7c7c3fad6d2135d558f3b36d0d1a943118aeb5e Author: Bram Moolenaar <Bram@vim.org> Date: Wed Jun 22 19:08:38 2022 +0100 patch 8.2.5150: read past the end of the first line with ":0;'{" Problem: Read past the end of the first line with ":0;'{". Solution: When on line zero check the column is valid for line one.
author Bram Moolenaar <Bram@vim.org>
date Wed, 22 Jun 2022 20:15:03 +0200
parents 5825405e4e2c
children
line wrap: on
line source

" Vim filetype plugin file
" Language:	QB64
" Maintainer:	Doug Kearns <dougkearns@gmail.com>

if exists("b:did_ftplugin")
  finish
endif

let s:cpo_save = &cpo
set cpo&vim

runtime! ftplugin/basic.vim

let s:not_end = '\%(end\s\+\)\@<!'

let b:match_words ..= ',' ..
		\     s:not_end .. '\<declare\>:\<end\s\+declare\>,' ..
		\     '\<select\s\+everycase\>:\%(select\s\+\)\@<!\<case\%(\s\+\%(else\|is\)\)\=\>:\<end\s\+select\>,' ..
		\     '$IF\>:$\%(ELSEIF\|ELSE\)\>:$END\s*IF\>'

unlet s:not_end

let &cpo = s:cpo_save
unlet s:cpo_save

" vim: nowrap sw=2 sts=2 ts=8 noet fdm=marker: