FM / indent

/usr/share/vim/vim82/indent

Name	Size	Mode	Actions
aap.vim	265	0644	edit dl rm
ada.vim	11234	0644	edit dl rm
ant.vim	290	0644	edit dl rm
automake.vim	243	0644	edit dl rm
awk.vim	7774	0644	edit dl rm
bash.vim	350	0644	edit dl rm
bib.vim	346	0644	edit dl rm
bst.vim	1937	0644	edit dl rm
bzl.vim	2925	0644	edit dl rm
c.vim	325	0644	edit dl rm
cdl.vim	4342	0644	edit dl rm
ch.vim	470	0644	edit dl rm
chaiscript.vim	1138	0644	edit dl rm
changelog.vim	264	0644	edit dl rm
clojure.vim	11557	0644	edit dl rm
cmake.vim	2683	0644	edit dl rm
cobol.vim	8832	0644	edit dl rm
config.vim	2222	0644	edit dl rm
context.vim	752	0644	edit dl rm
cpp.vim	329	0644	edit dl rm
cs.vim	1756	0644	edit dl rm
css.vim	1813	0644	edit dl rm
cucumber.vim	2678	0644	edit dl rm
cuda.vim	305	0644	edit dl rm
d.vim	572	0644	edit dl rm
dictconf.vim	337	0644	edit dl rm
dictdconf.vim	338	0644	edit dl rm
docbk.vim	336	0644	edit dl rm
dosbatch.vim	1382	0644	edit dl rm
dtd.vim	11954	0644	edit dl rm
dtrace.vim	451	0644	edit dl rm
dune.vim	332	0644	edit dl rm
dylan.vim	2770	0644	edit dl rm
eiffel.vim	3317	0644	edit dl rm
elm.vim	3277	0644	edit dl rm
erlang.vim	50066	0644	edit dl rm
eruby.vim	3016	0644	edit dl rm
eterm.vim	743	0644	edit dl rm
falcon.vim	14077	0644	edit dl rm
fortran.vim	7664	0644	edit dl rm
framescript.vim	891	0644	edit dl rm
gitconfig.vim	841	0644	edit dl rm
gitolite.vim	1277	0644	edit dl rm
go.vim	1673	0644	edit dl rm
haml.vim	2203	0644	edit dl rm
hamster.vim	1692	0644	edit dl rm
hog.vim	1892	0644	edit dl rm
html.vim	33651	0644	edit dl rm
htmldjango.vim	273	0644	edit dl rm
idlang.vim	1683	0644	edit dl rm
ishd.vim	1877	0644	edit dl rm
j.vim	1812	0644	edit dl rm
java.vim	4287	0644	edit dl rm
javascript.vim	15362	0644	edit dl rm
javascriptreact.vim	109	0644	edit dl rm
json.vim	4528	0644	edit dl rm
jsonc.vim	4727	0644	edit dl rm
jsp.vim	462	0644	edit dl rm
julia.vim	15449	0644	edit dl rm
ld.vim	1867	0644	edit dl rm
less.vim	243	0644	edit dl rm
lifelines.vim	638	0644	edit dl rm
liquid.vim	1899	0644	edit dl rm
lisp.vim	353	0644	edit dl rm
logtalk.vim	1859	0644	edit dl rm
lua.vim	1927	0644	edit dl rm
mail.vim	355	0644	edit dl rm
make.vim	3565	0644	edit dl rm
matlab.vim	4923	0644	edit dl rm
meson.vim	5319	0644	edit dl rm
mf.vim	156	0644	edit dl rm
mma.vim	2273	0644	edit dl rm
mp.vim	11321	0644	edit dl rm
nginx.vim	362	0644	edit dl rm
nsis.vim	3305	0644	edit dl rm
objc.vim	1646	0644	edit dl rm
ocaml.vim	9191	0644	edit dl rm
occam.vim	4700	0644	edit dl rm
pascal.vim	5793	0644	edit dl rm
perl.vim	5905	0644	edit dl rm
php.vim	25901	0644	edit dl rm
postscr.vim	1708	0644	edit dl rm
pov.vim	2662	0644	edit dl rm
prolog.vim	1864	0644	edit dl rm
ps1.vim	410	0644	edit dl rm
pyrex.vim	326	0644	edit dl rm
python.vim	6984	0644	edit dl rm
r.vim	14037	0644	edit dl rm
raku.vim	3416	0644	edit dl rm
raml.vim	285	0644	edit dl rm
readline.vim	786	0644	edit dl rm
rhelp.vim	2840	0644	edit dl rm
rmd.vim	2187	0644	edit dl rm
rnoweb.vim	1087	0644	edit dl rm
rpl.vim	1863	0644	edit dl rm
rrst.vim	1195	0644	edit dl rm
rst.vim	1820	0644	edit dl rm
ruby.vim	30148	0644	edit dl rm
rust.vim	6498	0644	edit dl rm
sas.vim	5270	0644	edit dl rm
sass.vim	950	0644	edit dl rm
scala.vim	19656	0644	edit dl rm
scheme.vim	372	0644	edit dl rm
scss.vim	191	0644	edit dl rm
sdl.vim	2829	0644	edit dl rm
sh.vim	9257	0644	edit dl rm
sml.vim	6478	0644	edit dl rm
sql.vim	1204	0644	edit dl rm
sqlanywhere.vim	13269	0644	edit dl rm
sshconfig.vim	796	0644	edit dl rm
systemd.vim	205	0644	edit dl rm
systemverilog.vim	8629	0644	edit dl rm
tcl.vim	2542	0644	edit dl rm
tcsh.vim	1381	0644	edit dl rm
teraterm.vim	1413	0644	edit dl rm
tex.vim	13689	0644	edit dl rm
tf.vim	1549	0644	edit dl rm
tilde.vim	1013	0644	edit dl rm
treetop.vim	708	0644	edit dl rm
typescript.vim	14481	0644	edit dl rm
vb.vim	2089	0644	edit dl rm
verilog.vim	8168	0644	edit dl rm
vhdl.vim	14666	0644	edit dl rm
vim.vim	5764	0644	edit dl rm
vroom.vim	379	0644	edit dl rm
wast.vim	458	0644	edit dl rm
xf86conf.vim	709	0644	edit dl rm
xhtml.vim	269	0644	edit dl rm
xinetd.vim	1231	0644	edit dl rm
xml.vim	7784	0644	edit dl rm
xsd.vim	253	0644	edit dl rm
xslt.vim	297	0644	edit dl rm
yacc.vim	781	0644	edit dl rm
yaml.vim	5471	0644	edit dl rm
zimbu.vim	3947	0644	edit dl rm
zsh.vim	411	0644	edit dl rm

Edit: /usr/share/vim/vim82/indent/julia.vim (15449B)

" Vim indent file
" Language:	Julia
" Maintainer:	Carlo Baldassi <carlobaldassi@gmail.com>
" Homepage:	https://github.com/JuliaEditorSupport/julia-vim
" Last Change:	2016 jun 16
" Notes:        originally based on Bram Molenaar's indent file for vim

setlocal autoindent

setlocal indentexpr=GetJuliaIndent()
setlocal indentkeys+==end,=else,=catch,=finally,),],}
setlocal indentkeys-=0#
setlocal indentkeys-=:
setlocal indentkeys-=0{
setlocal indentkeys-=0}
setlocal nosmartindent

" Only define the function once.
if exists("*GetJuliaIndent")
  finish
endif

function JuliaMatch(lnum, str, regex, st, ...)
  let s = a:st
  let e = a:0 > 0 ? a:1 : -1
  let basic_skip = a:0 > 1 ? a:2 : 'all'
  let skip = basic_skip ==# 'basic' ? s:skipPatternsBasic : s:skipPatterns
  while 1
    let f = match(a:str, '\C' . a:regex, s)
    if e >= 0 && f >= e
      return -1
    endif
    if f >= 0
      let attr = synIDattr(synID(a:lnum,f+1,1),"name")
      let attrT = synIDattr(synID(a:lnum,f+1,0),"name")
      if attr =~# skip || attrT =~# skip
        let s = f+1
        continue
      endif
    endif
    break
  endwhile
  return f
endfunction

if fb < 0 && fe < 0
      " No blocks found
      break
    end

if fb >= 0 && (fb < fe || fe < 0)
      " The first occurrence is an opening block keyword
      " Note: some keywords (elseif,else,catch,finally) are both
      "       closing blocks and opening new ones

let i = JuliaMatch(a:lnum, line, '\<if\>', s)
      if i >= 0 && i == fb
        let s = i+1
        call add(blocks_stack, 'if')
        continue
      endif
      let i = JuliaMatch(a:lnum, line, '\<elseif\>', s)
      if i >= 0 && i == fb
        let s = i+1
        if len(blocks_stack) > 0 && blocks_stack[-1] == 'if'
          let blocks_stack[-1] = 'elseif'
        elseif (len(blocks_stack) > 0 && blocks_stack[-1] != 'elseif') || len(blocks_stack) == 0
          call add(blocks_stack, 'elseif')
          let num_closed_blocks += 1
        endif
        continue
      endif
      let i = JuliaMatch(a:lnum, line, '\<else\>', s)
      if i >= 0 && i == fb
        let s = i+1
        if len(blocks_stack) > 0 && blocks_stack[-1] =~# '\<\%(else\)\=if\>'
          let blocks_stack[-1] = 'else'
        else
          call add(blocks_stack, 'else')
          let num_closed_blocks += 1
        endif
        continue
      endif

let i = JuliaMatch(a:lnum, line, '\<try\>', s)
      if i >= 0 && i == fb
        let s = i+1
        call add(blocks_stack, 'try')
        continue
      endif
      let i = JuliaMatch(a:lnum, line, '\<catch\>', s)
      if i >= 0 && i == fb
        let s = i+1
        if len(blocks_stack) > 0 && blocks_stack[-1] == 'try'
          let blocks_stack[-1] = 'catch'
        else
          call add(blocks_stack, 'catch')
          let num_closed_blocks += 1
        endif
        continue
      endif
      let i = JuliaMatch(a:lnum, line, '\<finally\>', s)
      if i >= 0 && i == fb
        let s = i+1
        if len(blocks_stack) > 0 && (blocks_stack[-1] == 'try' || blocks_stack[-1] == 'catch')
          let blocks_stack[-1] = 'finally'
        else
          call add(blocks_stack, 'finally')
          let num_closed_blocks += 1
        endif
        continue
      endif

let i = JuliaMatch(a:lnum, line, '\<\%(bare\)\?module\>', s)
      if i >= 0 && i == fb
        let s = i+1
        if i == 0
          call add(blocks_stack, 'col1module')
        else
          call add(blocks_stack, 'other')
        endif
        continue
      endif

" Note: it should be impossible to get here
      break

else
      " The first occurrence is an 'end'

let s = fe+1
      if len(blocks_stack) == 0
        let num_closed_blocks += 1
      else
        call remove(blocks_stack, -1)
      endif
      continue

endif

" Note: it should be impossible to get here
    break
  endwhile
  let num_open_blocks = len(blocks_stack) - count(blocks_stack, 'col1module')
  return [num_open_blocks, num_closed_blocks]
endfunction

function GetJuliaNestingBrackets(lnum, c)
  " Auxiliary function to inspect the brackets structure of a line
  let line = getline(a:lnum)[0 : (a:c - 1)]
  let s = 0
  let brackets_stack = []
  let last_closed_bracket = -1
  while 1
    let fb = JuliaMatch(a:lnum, line, '[([{]', s)
    let fe = JuliaMatch(a:lnum, line, '[])}]', s)

if fb < 0 && fe < 0
      " No brackets found
      break
    end

if fb >= 0 && (fb < fe || fe < 0)
      " The first occurrence is an opening bracket

let i = JuliaMatch(a:lnum, line, '(', s)
      if i >= 0 && i == fb
        let s = i+1
        call add(brackets_stack, ['par',i])
        continue
      endif

let i = JuliaMatch(a:lnum, line, '\[', s)
      if i >= 0 && i == fb
        let s = i+1
        call add(brackets_stack, ['sqbra',i])
        continue
      endif

let i = JuliaMatch(a:lnum, line, '{', s)
      if i >= 0 && i == fb
        let s = i+1
        call add(brackets_stack, ['curbra',i])
        continue
      endif

" Note: it should be impossible to get here
      break

else
      " The first occurrence is a closing bracket

let i = JuliaMatch(a:lnum, line, ')', s)
      if i >= 0 && i == fe
        let s = i+1
        if len(brackets_stack) > 0 && brackets_stack[-1][0] == 'par'
          call remove(brackets_stack, -1)
        else
          let last_closed_bracket = i + 1
        endif
        continue
      endif

let i = JuliaMatch(a:lnum, line, ']', s)
      if i >= 0 && i == fe
        let s = i+1
        if len(brackets_stack) > 0 && brackets_stack[-1][0] == 'sqbra'
          call remove(brackets_stack, -1)
        else
          let last_closed_bracket = i + 1
        endif
        continue
      endif

let i = JuliaMatch(a:lnum, line, '}', s)
      if i >= 0 && i == fe
        let s = i+1
        if len(brackets_stack) > 0 && brackets_stack[-1][0] == 'curbra'
          call remove(brackets_stack, -1)
        else
          let last_closed_bracket = i + 1
        endif
        continue
      endif

" Note: it should be impossible to get here
      break

endif

" Note: it should be impossible to get here
    break
  endwhile
  let first_open_bracket = -1
  let last_open_bracket = -1
  let infuncargs = 0
  if len(brackets_stack) > 0
    let first_open_bracket = brackets_stack[0][1]
    let last_open_bracket = brackets_stack[-1][1]
    if brackets_stack[-1][0] == 'par' && IsFunctionArgPar(a:lnum, last_open_bracket+1)
      let infuncargs = 1
    endif
  endif
  return [first_open_bracket, last_open_bracket, last_closed_bracket, infuncargs]
endfunction

function IsInBrackets(lnum, c)
  let stack = map(synstack(a:lnum, a:c), 'synIDattr(v:val, "name")')
  call filter(stack, 'v:val =~# s:bracketBlocks')
  return len(stack) > 0
endfunction

function IsInDocString(lnum)
  let stack = map(synstack(a:lnum, 1), 'synIDattr(v:val, "name")')
  call filter(stack, 'v:val =~# "\\<juliaDocString\\(Delim\\|M\\\(Raw\\)\\?\\)\\?\\>"')
  return len(stack) > 0
endfunction

function IsInContinuationImportLine(lnum)
  let stack = map(synstack(a:lnum, 1), 'synIDattr(v:val, "name")')
  call filter(stack, 'v:val =~# "\\<juliaImportLine\\>"')
  if len(stack) == 0
    return 0
  endif
  return JuliaMatch(a:lnum, getline(a:lnum), '\<\%(import\|using\|export\)\>', indent(a:lnum)) == -1
endfunction

function IsFunctionArgPar(lnum, c)
  if a:c == 0
    return 0
  endif
  let stack = map(synstack(a:lnum, a:c-1), 'synIDattr(v:val, "name")')
  return len(stack) >= 2 && stack[-2] ==# 'juliaFunctionDef'
endfunction

function JumpToMatch(lnum, last_closed_bracket)
  " we use the % command to skip back (tries to ues matchit if possible,
  " otherwise resorts to vim's default, which is buggy but better than
  " nothing)
  call cursor(a:lnum, a:last_closed_bracket)
  let percmap = maparg("%", "n") 
  if exists("g:loaded_matchit") && percmap =~# 'Match\%(it\|_wrapper\)'
    normal %
  else
    normal! %
  end
endfunction

" Auxiliary function to find a line which does not start in the middle of a
" multiline bracketed expression, to be used as reference for block
" indentation.
function LastBlockIndent(lnum)
  let lnum = a:lnum
  let ind = 0
  while lnum > 0
    let ind = indent(lnum)
    if ind == 0
      return [lnum, 0]
    endif
    if !IsInBrackets(lnum, 1)
      break
    endif
    let lnum = prevnonblank(lnum - 1)
  endwhile
  return [max([lnum,1]), ind]
endfunction

function GetJuliaIndent()
  " Do not alter doctrings indentation
  if IsInDocString(v:lnum)
    return -1
  endif

" Find a non-blank line above the current line.
  let lnum = prevnonblank(v:lnum - 1)

" At the start of the file use zero indent.
  if lnum == 0
    return 0
  endif

let ind = -1
  let st = -1
  let lim = -1

" Multiline bracketed expressions take precedence
  let align_brackets = get(g:, "julia_indent_align_brackets", 1)
  let align_funcargs = get(g:, "julia_indent_align_funcargs", 0)
  let c = len(getline(lnum)) + 1
  while IsInBrackets(lnum, c)
    let [first_open_bracket, last_open_bracket, last_closed_bracket, infuncargs] = GetJuliaNestingBrackets(lnum, c)

" First scenario: the previous line has a hanging open bracket:
    " set the indentation to match the opening bracket (plus an extra space)
    " unless we're in a function arguments list or alignment is disabled, in
    " which case we just add an extra indent
    if last_open_bracket != -1
      if (!infuncargs && align_brackets) || (infuncargs && align_funcargs)
        let st = last_open_bracket
        let ind = virtcol([lnum, st + 1])
      else
        let ind = indent(lnum) + shiftwidth()
      endif

" Second scenario: some multiline bracketed expression was closed in the
    " previous line. But since we know we are still in a bracketed expression,
    " we need to find the line where the bracket was opened
    elseif last_closed_bracket != -1
      call JumpToMatch(lnum, last_closed_bracket)
      if line(".") == lnum
        " something wrong here, give up
        let ind = indent(lnum)
      else
        let lnum = line(".")
        let c = col(".") - 1
        if c == 0
          " uhm, give up
          let ind = 0
        else
          " we skipped a bracket set, keep searching for an opening bracket
          let lim = c
          continue
        endif
      endif

" Third scenario: nothing special: keep the indentation
    else
      let ind = indent(lnum)
    endif

" Does the current line start with a closing bracket? Then depending on
    " the situation we align it with the opening one, or we let the rest of
    " the code figure it out (the case in which we're closing a function
    " argument list is special-cased)
    if JuliaMatch(v:lnum, getline(v:lnum), '[])}]', indent(v:lnum)) == indent(v:lnum) && ind > 0
      if !align_brackets && !align_funcargs
        call JumpToMatch(v:lnum, indent(v:lnum))
        return indent(line("."))
      elseif (align_brackets && getline(v:lnum)[indent(v:lnum)] != ')') || align_funcargs
        return ind - 1
      else " must be a ')' and align_brackets==1 and align_funcargs==0
        call JumpToMatch(v:lnum, indent(v:lnum))
        if IsFunctionArgPar(line("."), col("."))
          let ind = -1
        else
          return ind - 1
        endif
      endif
    endif

break
  endwhile

if ind == -1
    " We are not in a multiline bracketed expression. Thus we look for a
    " previous line to use as a reference
    let [lnum,ind] = LastBlockIndent(lnum)
    let c = len(getline(lnum)) + 1
    if IsInBrackets(lnum, c)
      let [first_open_bracket, last_open_bracket, last_closed_bracket, infuncargs] = GetJuliaNestingBrackets(lnum, c)
      let lim = first_open_bracket
    endif
  end

" Analyse the reference line
  let [num_open_blocks, num_closed_blocks] = GetJuliaNestingStruct(lnum, st, lim)
  " Increase indentation for each newly opened block in the reference line
  let ind += shiftwidth() * num_open_blocks

" Analyse the current line
  let [num_open_blocks, num_closed_blocks] = GetJuliaNestingStruct(v:lnum)
  " Decrease indentation for each closed block in the current line
  let ind -= shiftwidth() * num_closed_blocks

" Additional special case: multiline import/using/export statements

let prevline = getline(lnum)
  " Are we in a multiline import/using/export statement, right below the
  " opening line?
  if IsInContinuationImportLine(v:lnum) && !IsInContinuationImportLine(lnum)
    if get(g:, 'julia_indent_align_import', 1)
      " if the opening line has a colon followed by non-comments, use it as
      " reference point
      let cind = JuliaMatch(lnum, prevline, ':', indent(lnum), lim)
      if cind >= 0
        let nonwhiteind = JuliaMatch(lnum, prevline, '\S', cind+1, -1, 'basic')
        if nonwhiteind >= 0
          " return match(prevline, '\S', cind+1) " a bit overkill...
          return cind + 2
        endif
      else
        " if the opening line is not a naked import/using/export statement, use
        " it as reference
        let iind = JuliaMatch(lnum, prevline, '\<import\|using\|export\>', indent(lnum), lim)
        if iind >= 0
          " assuming whitespace after using... so no `using(XYZ)` please!
          let nonwhiteind = JuliaMatch(lnum, prevline, '\S', iind+6, -1, 'basic')
          if nonwhiteind >= 0
            return match(prevline, '\S', iind+6)
          endif
        endif
      endif
    endif
    let ind += shiftwidth()

" Or did we just close a multiline import/using/export statement?
  elseif !IsInContinuationImportLine(v:lnum) && IsInContinuationImportLine(lnum)
    " find the starting line of the statement
    let ilnum = 0
    for iln in range(lnum-1, 1, -1)
      if !IsInContinuationImportLine(iln)
        let ilnum = iln
        break
      endif
    endfor
    if ilnum == 0
      " something went horribly wrong, give up
      let ind = indent(lnum)
    endif
    let ind = indent(ilnum)
  endif

return ind
endfunction

cmd: