annotate runtime/indent/matlab.vim @ 32285:3eaac488d36f

Added tag v9.0.1473 for changeset 8a7a4c1f41e03e874a8215b6b5e44a0b08be9cf8
author Bram Moolenaar <Bram@vim.org>
date Fri, 21 Apr 2023 19:00:05 +0200
parents 9c221ad9634a
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
15194
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
1 " Vim indent file
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
2 " Language: MATLAB
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
3 " Maintainer: Axel Forsman <axelsfor@gmail.com>
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
4 " Previous maintainer: Christophe Poucet <christophe.poucet@pandora.be>
25880
9c221ad9634a Update runtime files
Bram Moolenaar <Bram@vim.org>
parents: 18848
diff changeset
5 " Last Update: 2021-10-01
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6
15194
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
7 " Only load if no other indent file is loaded
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
8 if exists('b:did_indent') | finish | endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
9 let b:did_indent = 1
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
10
15194
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
11 setlocal indentexpr=GetMatlabIndent()
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
12 setlocal indentkeys=!,o,O,e,0=end,0=elseif,0=case,0=otherwise,0=catch,0=function,0=elsei
25880
9c221ad9634a Update runtime files
Bram Moolenaar <Bram@vim.org>
parents: 18848
diff changeset
13 let b:undo_indent = "setlocal indentexpr< indentkeys<"
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
14
15194
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
15 " The value of the Function indenting format in
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
16 " MATLAB Editor/Debugger Language Preferences.
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
17 " The possible values are 0 for Classic, 1 for Indent nested functions
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
18 " and 2 for Indent all functions (default).
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
19 let b:MATLAB_function_indent = get(g:, 'MATLAB_function_indent', 2)
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
20 " The previous value of b:changedtick
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
21 let b:MATLAB_lasttick = -1
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
22 " The previously indented line
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
23 let b:MATLAB_lastline = -1
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
24 " Whether the line above was a line continuation
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
25 let b:MATLAB_waslc = 0
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
26 let b:MATLAB_bracketlevel = 0
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
27
15194
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
28 " Only define the function once
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
29 if exists("*GetMatlabIndent") | finish | endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
30
15194
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
31 let s:keepcpo = &cpo
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
32 set cpo&vim
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
33
18848
a0e0f0256d0b Runtime file updates.
Bram Moolenaar <Bram@vim.org>
parents: 15194
diff changeset
34 let s:end = '\<end\>\%([^({]*[)}]\)\@!' " Array indexing heuristic
15194
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
35 let s:open_pat = 'for\|if\|parfor\|spmd\|switch\|try\|while\|classdef\|properties\|methods\|events\|enumeration'
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
36 let s:dedent_pat = '\C^\s*\zs\<\%(end\|else\|elseif\|catch\|\(case\|otherwise\|function\)\)\>'
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
37 let s:start_pat = '\C\<\%(function\|' . s:open_pat . '\)\>'
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
38 let s:bracket_pair_pat = '\(\[\|{\)\|\(\]\|}\)'
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
39 let s:zflag = has('patch-7.4.984') ? 'z' : ''
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
40
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
41 " Returns whether a comment or string envelops the specified column.
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
42 function! s:IsCommentOrString(lnum, col)
18848
a0e0f0256d0b Runtime file updates.
Bram Moolenaar <Bram@vim.org>
parents: 15194
diff changeset
43 return synIDattr(synID(a:lnum, a:col, 1), "name") =~# 'matlabComment\|matlabMultilineComment\|matlabCellComment\|matlabString'
15194
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
44 endfunction
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
45
15194
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
46 " Returns whether the specified line continues on the next line.
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
47 function! s:IsLineContinuation(lnum)
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
48 let l = getline(a:lnum) | let c = -3
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
49 while 1
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
50 let c = match(l, '\.\{3}', c + 3)
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
51 if c == -1 | return 0
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
52 elseif !s:IsCommentOrString(a:lnum, c) | return 1 | endif
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
53 endwhile
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
54 endfunction
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
55
15194
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
56 function! s:SubmatchCount(lnum, pattern, ...)
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
57 let endcol = a:0 >= 1 ? a:1 : 1 / 0 | let x = [0, 0, 0, 0]
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
58 call cursor(a:lnum, 1)
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
59 while 1
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
60 let [lnum, c, submatch] = searchpos(a:pattern, 'cpe' . s:zflag, a:lnum)
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
61 if !submatch || c >= endcol | break | endif
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
62 if !s:IsCommentOrString(lnum, c) | let x[submatch - 2] += 1 | endif
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
63 if cursor(0, c + 1) == -1 || col('.') == c | break | endif
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
64 endwhile
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
65 return x
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
66 endfunction
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
67
15194
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
68 function! s:GetOpenCloseCount(lnum, pattern, ...)
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
69 let counts = call('s:SubmatchCount', [a:lnum, a:pattern] + a:000)
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
70 return counts[0] - counts[1]
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
71 endfunction
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
72
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
73 function! GetMatlabIndent()
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
74 let prevlnum = prevnonblank(v:lnum - 1)
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
75
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
76 if b:MATLAB_lasttick != b:changedtick || b:MATLAB_lastline != prevlnum
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
77 " Recalculate bracket count (only have to check same block and line above)
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
78 let b:MATLAB_bracketlevel = 0
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
79 let previndent = indent(prevlnum) | let l = prevlnum
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
80 while 1
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
81 let l = prevnonblank(l - 1) | let indent = indent(l)
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
82 if l <= 0 || previndent < indent | break | endif
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
83 let b:MATLAB_bracketlevel += s:GetOpenCloseCount(l, s:bracket_pair_pat)
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
84 if previndent != indent | break | endif
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
85 endwhile
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
86
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
87 let b:MATLAB_waslc = s:IsLineContinuation(prevlnum - 1)
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
88 endif
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
89 " If line above was blank it can impossibly have been a LC
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
90 let above_lc = b:MATLAB_lasttick == b:changedtick && prevlnum != v:lnum - 1 && b:MATLAB_lastline == prevlnum ? 0 : s:IsLineContinuation(v:lnum - 1)
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
91
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
92 let pair_pat = '\C\<\(' . s:open_pat . '\|'
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
93 \ . (b:MATLAB_function_indent == 1 ? '^\@<!' : '')
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
94 \ . (b:MATLAB_function_indent >= 1 ? 'function\|' : '')
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
95 \ . '\|\%(^\s*\)\@<=\%(else\|elseif\|case\|otherwise\|catch\)\)\>'
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
96 \ . '\|\S\s*\zs\(' . s:end . '\)'
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
97 let [open, close, b_open, b_close] = prevlnum ? s:SubmatchCount(prevlnum,
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
98 \ pair_pat . '\|' . s:bracket_pair_pat) : [0, 0, 0, 0]
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
99 let curbracketlevel = b:MATLAB_bracketlevel + b_open - b_close
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
100
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
101 call cursor(v:lnum, 1)
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
102 let submatch = search(s:dedent_pat, 'cp' . s:zflag, v:lnum)
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
103 if submatch && !s:IsCommentOrString(v:lnum, col('.'))
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
104 " Align end, et cetera with start of block
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
105 let [lnum, col] = searchpairpos(s:start_pat, '', '\C' . s:end, 'bW', 's:IsCommentOrString(line("."), col("."))')
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
106 let result = lnum ? indent(lnum) + shiftwidth() * (s:GetOpenCloseCount(lnum, pair_pat, col) + submatch == 2) : 0
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
107 else
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
108 " Count how many blocks the previous line opens/closes
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
109 " Line continuations/brackets indent once per statement
18848
a0e0f0256d0b Runtime file updates.
Bram Moolenaar <Bram@vim.org>
parents: 15194
diff changeset
110 let result = (prevlnum > 0) * indent(prevlnum) + shiftwidth() * (open - close
15194
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
111 \ + (b:MATLAB_bracketlevel ? -!curbracketlevel : !!curbracketlevel)
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
112 \ + (curbracketlevel <= 0) * (above_lc - b:MATLAB_waslc))
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
113 endif
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
114
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
115 let b:MATLAB_waslc = above_lc
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
116 let b:MATLAB_bracketlevel = curbracketlevel
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
117 let b:MATLAB_lasttick = b:changedtick
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
118 let b:MATLAB_lastline = v:lnum
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
119 return result
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
120 endfunction
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
121
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
122 let &cpo = s:keepcpo
8b334e4cb97f Update runtime files.
Bram Moolenaar <Bram@vim.org>
parents: 11518
diff changeset
123 unlet s:keepcpo