Mercurial > vim
annotate runtime/compiler/decada.vim @ 29265:9bc63b4f9c33 v8.2.5151
patch 8.2.5151: reading beyond the end of the line with lisp indenting
Commit: https://github.com/vim/vim/commit/8eba2bd291b347e3008aa9e565652d51ad638cfa
Author: Bram Moolenaar <Bram@vim.org>
Date: Wed Jun 22 19:59:28 2022 +0100
patch 8.2.5151: reading beyond the end of the line with lisp indenting
Problem: Reading beyond the end of the line with lisp indenting.
Solution: Avoid going over the NUL at the end of the line.
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Wed, 22 Jun 2022 21:00:03 +0200 |
parents | 8201108e9cf0 |
children | e1df51f68736 |
rev | line source |
---|---|
1125 | 1 "------------------------------------------------------------------------------ |
2 " Description: Vim Ada/Dec Ada compiler file | |
3 " Language: Ada (Dec Ada) | |
2034 | 4 " $Id: decada.vim 887 2008-07-08 14:29:01Z krischik $ |
1125 | 5 " Copyright: Copyright (C) 2006 Martin Krischik |
1668 | 6 " Maintainer: Martin Krischik <krischik@users.sourceforge.net> |
2034 | 7 " $Author: krischik $ |
8 " $Date: 2008-07-08 16:29:01 +0200 (Di, 08 Jul 2008) $ | |
1668 | 9 " Version: 4.6 |
2034 | 10 " $Revision: 887 $ |
1668 | 11 " $HeadURL: https://gnuada.svn.sourceforge.net/svnroot/gnuada/trunk/tools/vim/compiler/decada.vim $ |
1125 | 12 " History: 21.07.2006 MK New Dec Ada |
13 " 15.10.2006 MK Bram's suggestion for runtime integration | |
1668 | 14 " 08.09.2006 MK Correct double load protection. |
1125 | 15 " Help Page: compiler-decada |
16 "------------------------------------------------------------------------------ | |
17 | |
3507
8201108e9cf0
More runtime file fixes for 'compatible' mode.
Bram Moolenaar <bram@vim.org>
parents:
3496
diff
changeset
|
18 if (exists("current_compiler") && current_compiler == "decada") || version < 700 |
8201108e9cf0
More runtime file fixes for 'compatible' mode.
Bram Moolenaar <bram@vim.org>
parents:
3496
diff
changeset
|
19 finish |
8201108e9cf0
More runtime file fixes for 'compatible' mode.
Bram Moolenaar <bram@vim.org>
parents:
3496
diff
changeset
|
20 endif |
3496
d1e4abe8342c
Fixed compatible mode in most runtime files.
Bram Moolenaar <bram@vim.org>
parents:
2034
diff
changeset
|
21 let s:keepcpo= &cpo |
d1e4abe8342c
Fixed compatible mode in most runtime files.
Bram Moolenaar <bram@vim.org>
parents:
2034
diff
changeset
|
22 set cpo&vim |
d1e4abe8342c
Fixed compatible mode in most runtime files.
Bram Moolenaar <bram@vim.org>
parents:
2034
diff
changeset
|
23 |
1125 | 24 let current_compiler = "decada" |
25 | |
26 if !exists("g:decada") | |
27 let g:decada = decada#New () | |
1668 | 28 |
29 call ada#Map_Menu ( | |
30 \'Dec Ada.Build', | |
31 \'<F7>', | |
32 \'call decada.Make ()') | |
33 | |
34 call g:decada.Set_Session () | |
1125 | 35 endif |
36 | |
37 if exists(":CompilerSet") != 2 | |
38 " | |
39 " plugin loaded by other means then the "compiler" command | |
40 " | |
41 command -nargs=* CompilerSet setlocal <args> | |
42 endif | |
43 | |
44 execute "CompilerSet makeprg=" . escape (g:decada.Make_Command, ' ') | |
45 execute "CompilerSet errorformat=" . escape (g:decada.Error_Format, ' ') | |
46 | |
3496
d1e4abe8342c
Fixed compatible mode in most runtime files.
Bram Moolenaar <bram@vim.org>
parents:
2034
diff
changeset
|
47 let &cpo = s:keepcpo |
d1e4abe8342c
Fixed compatible mode in most runtime files.
Bram Moolenaar <bram@vim.org>
parents:
2034
diff
changeset
|
48 unlet s:keepcpo |
d1e4abe8342c
Fixed compatible mode in most runtime files.
Bram Moolenaar <bram@vim.org>
parents:
2034
diff
changeset
|
49 |
1125 | 50 finish " 1}}} |
51 | |
52 "------------------------------------------------------------------------------ | |
53 " Copyright (C) 2006 Martin Krischik | |
54 " | |
55 " Vim is Charityware - see ":help license" or uganda.txt for licence details. | |
56 "------------------------------------------------------------------------------ | |
57 " vim: textwidth=78 wrap tabstop=8 shiftwidth=3 softtabstop=3 noexpandtab | |
58 " vim: foldmethod=marker |