Mercurial > vim
annotate runtime/indent/j.vim @ 9655:f1920505bc16 v7.4.2104
commit https://github.com/vim/vim/commit/97baee80f0906ee2f651ee1215ec033e84f866ad
Author: Bram Moolenaar <Bram@vim.org>
Date: Tue Jul 26 20:46:08 2016 +0200
patch 7.4.2104
Problem: Code duplication when unreferencing a function.
Solution: De-duplicate.
author | Christian Brabandt <cb@256bit.org> |
---|---|
date | Tue, 26 Jul 2016 21:00:08 +0200 |
parents | 198e1e498edf |
children | cb3163d590a1 |
rev | line source |
---|---|
5362
ab1508486b12
Update runtime files. Add support for J.
Bram Moolenaar <bram@vim.org>
parents:
diff
changeset
|
1 " Vim indent file |
ab1508486b12
Update runtime files. Add support for J.
Bram Moolenaar <bram@vim.org>
parents:
diff
changeset
|
2 " Language: J |
ab1508486b12
Update runtime files. Add support for J.
Bram Moolenaar <bram@vim.org>
parents:
diff
changeset
|
3 " Maintainer: David Bürgin <676c7473@gmail.com> |
5734 | 4 " URL: https://github.com/glts/vim-j |
6505 | 5 " Last Change: 2015-01-11 |
5362
ab1508486b12
Update runtime files. Add support for J.
Bram Moolenaar <bram@vim.org>
parents:
diff
changeset
|
6 |
5734 | 7 if exists('b:did_indent') |
5362
ab1508486b12
Update runtime files. Add support for J.
Bram Moolenaar <bram@vim.org>
parents:
diff
changeset
|
8 finish |
ab1508486b12
Update runtime files. Add support for J.
Bram Moolenaar <bram@vim.org>
parents:
diff
changeset
|
9 endif |
ab1508486b12
Update runtime files. Add support for J.
Bram Moolenaar <bram@vim.org>
parents:
diff
changeset
|
10 let b:did_indent = 1 |
ab1508486b12
Update runtime files. Add support for J.
Bram Moolenaar <bram@vim.org>
parents:
diff
changeset
|
11 |
ab1508486b12
Update runtime files. Add support for J.
Bram Moolenaar <bram@vim.org>
parents:
diff
changeset
|
12 setlocal indentexpr=GetJIndent() |
5815 | 13 setlocal indentkeys-=0{,0},:,0# |
14 setlocal indentkeys+=0),0<:>,=case.,=catch.,=catchd.,=catcht.,=do.,=else.,=elseif.,=end.,=fcase. | |
5362
ab1508486b12
Update runtime files. Add support for J.
Bram Moolenaar <bram@vim.org>
parents:
diff
changeset
|
15 |
5734 | 16 let b:undo_indent = 'setlocal indentkeys< indentexpr<' |
5362
ab1508486b12
Update runtime files. Add support for J.
Bram Moolenaar <bram@vim.org>
parents:
diff
changeset
|
17 |
5734 | 18 if exists('*GetJIndent') |
5362
ab1508486b12
Update runtime files. Add support for J.
Bram Moolenaar <bram@vim.org>
parents:
diff
changeset
|
19 finish |
ab1508486b12
Update runtime files. Add support for J.
Bram Moolenaar <bram@vim.org>
parents:
diff
changeset
|
20 endif |
ab1508486b12
Update runtime files. Add support for J.
Bram Moolenaar <bram@vim.org>
parents:
diff
changeset
|
21 |
5815 | 22 " If g:j_indent_definitions is true, the bodies of explicit definitions of |
23 " adverbs, conjunctions, and verbs will be indented. Default is false (0). | |
24 if !exists('g:j_indent_definitions') | |
25 let g:j_indent_definitions = 0 | |
26 endif | |
27 | |
28 function GetJIndent() abort | |
6505 | 29 let l:prevlnum = prevnonblank(v:lnum - 1) |
30 if l:prevlnum == 0 | |
5362
ab1508486b12
Update runtime files. Add support for J.
Bram Moolenaar <bram@vim.org>
parents:
diff
changeset
|
31 return 0 |
ab1508486b12
Update runtime files. Add support for J.
Bram Moolenaar <bram@vim.org>
parents:
diff
changeset
|
32 endif |
6505 | 33 let l:indent = indent(l:prevlnum) |
34 let l:prevline = getline(l:prevlnum) | |
35 if l:prevline =~# '^\s*\%(case\|catch[dt]\=\|do\|else\%(if\)\=\|fcase\|for\%(_\a\k*\)\=\|if\|select\|try\|whil\%(e\|st\)\)\.\%(\%(\<end\.\)\@!.\)*$' | |
5815 | 36 " Increase indentation after an initial control word that starts or |
37 " continues a block and is not terminated by "end." | |
6505 | 38 let l:indent += shiftwidth() |
39 elseif g:j_indent_definitions && (l:prevline =~# '\<\%([1-4]\|13\|adverb\|conjunction\|verb\|monad\|dyad\)\s\+\%(:\s*0\|def\s\+0\|define\)\>' || l:prevline =~# '^\s*:\s*$') | |
5815 | 40 " Increase indentation in explicit definitions of adverbs, conjunctions, |
41 " and verbs | |
6505 | 42 let l:indent += shiftwidth() |
5362
ab1508486b12
Update runtime files. Add support for J.
Bram Moolenaar <bram@vim.org>
parents:
diff
changeset
|
43 endif |
5815 | 44 " Decrease indentation in lines that start with either control words that |
45 " continue or end a block, or the special items ")" and ":" | |
46 if getline(v:lnum) =~# '^\s*\%()\|:\|\%(case\|catch[dt]\=\|do\|else\%(if\)\=\|end\|fcase\)\.\)' | |
6505 | 47 let l:indent -= shiftwidth() |
5362
ab1508486b12
Update runtime files. Add support for J.
Bram Moolenaar <bram@vim.org>
parents:
diff
changeset
|
48 endif |
6505 | 49 return l:indent |
5362
ab1508486b12
Update runtime files. Add support for J.
Bram Moolenaar <bram@vim.org>
parents:
diff
changeset
|
50 endfunction |