Mercurial > vim
annotate runtime/indent/teraterm.vim @ 32258:6ababf71c1b1 v9.0.1460
patch 9.0.1460: insufficient testing for getcmdcompltype()
Commit: https://github.com/vim/vim/commit/961b2e54bdbe1c06e4bf8ccf7a7e3deb129b45de
Author: zeertzjq <zeertzjq@outlook.com>
Date: Mon Apr 17 15:53:24 2023 +0100
patch 9.0.1460: insufficient testing for getcmdcompltype()
Problem: Insufficient testing for getcmdcompltype().
Solution: Add a few more test cases. (closes https://github.com/vim/vim/issues/12268)
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Mon, 17 Apr 2023 17:00:05 +0200 |
parents | ebedba7a4898 |
children |
rev | line source |
---|---|
6951 | 1 " Vim indent file |
2 " Language: Tera Term Language (TTL) | |
14668 | 3 " Based on Tera Term Version 4.100 |
6951 | 4 " Maintainer: Ken Takata |
5 " URL: https://github.com/k-takata/vim-teraterm | |
26050 | 6 " Last Change: 2021-10-18 |
6951 | 7 " Filenames: *.ttl |
8 " License: VIM License | |
9 | |
10 if exists("b:did_indent") | |
11 finish | |
12 endif | |
13 let b:did_indent = 1 | |
14 | |
15 setlocal nosmartindent | |
16 setlocal noautoindent | |
17 setlocal indentexpr=GetTeraTermIndent(v:lnum) | |
18 setlocal indentkeys=!^F,o,O,e | |
19 setlocal indentkeys+==elseif,=endif,=loop,=next,=enduntil,=endwhile | |
20 | |
26050 | 21 let b:undo_indent = "setl ai< inde< indk< si<" |
22 | |
6951 | 23 if exists("*GetTeraTermIndent") |
24 finish | |
25 endif | |
26 | |
27 function! GetTeraTermIndent(lnum) | |
28 let l:prevlnum = prevnonblank(a:lnum-1) | |
29 if l:prevlnum == 0 | |
30 " top of file | |
31 return 0 | |
32 endif | |
33 | |
34 " grab the previous and current line, stripping comments. | |
35 let l:prevl = substitute(getline(l:prevlnum), ';.*$', '', '') | |
36 let l:thisl = substitute(getline(a:lnum), ';.*$', '', '') | |
37 let l:previ = indent(l:prevlnum) | |
38 | |
39 let l:ind = l:previ | |
40 | |
9908
2b6654519a7c
commit https://github.com/vim/vim/commit/7571d55f7dcc009a375b2124cce2c8b21f361234
Christian Brabandt <cb@256bit.org>
parents:
6951
diff
changeset
|
41 if l:prevl =~ '^\s*if\>.*\<then\>' |
6951 | 42 " previous line opened a block |
11518 | 43 let l:ind += shiftwidth() |
6951 | 44 endif |
45 if l:prevl =~ '^\s*\%(elseif\|else\|do\|until\|while\|for\)\>' | |
46 " previous line opened a block | |
11518 | 47 let l:ind += shiftwidth() |
6951 | 48 endif |
49 if l:thisl =~ '^\s*\%(elseif\|else\|endif\|enduntil\|endwhile\|loop\|next\)\>' | |
50 " this line closed a block | |
11518 | 51 let l:ind -= shiftwidth() |
6951 | 52 endif |
53 | |
54 return l:ind | |
55 endfunction | |
56 | |
57 " vim: ts=8 sw=2 sts=2 |