view runtime/indent/framescript.vim @ 10815:f883a1224396 v8.0.0297

patch 8.0.0297: double free on exit when using a closure commit https://github.com/vim/vim/commit/03ff9bcbc968f7d306e4a4e334e226fdde62ca82 Author: Bram Moolenaar <Bram@vim.org> Date: Thu Feb 2 22:59:27 2017 +0100 patch 8.0.0297: double free on exit when using a closure Problem: Double free on exit when using a closure. (James McCoy) Solution: Split free_al_functions in two parts. (closes https://github.com/vim/vim/issues/1428)
author Christian Brabandt <cb@256bit.org>
date Thu, 02 Feb 2017 23:00:04 +0100
parents f4f8014d516e
children 1218c5353e2b
line wrap: on
line source

" Vim indent file
" Language:         FrameScript
" Maintainer:       Nikolai Weibull <now@bitwi.se>
" Latest Revision:  2008-07-19

if exists("b:did_indent")
  finish
endif
let b:did_indent = 1

setlocal indentexpr=GetFrameScriptIndent()
setlocal indentkeys=!^F,o,O,0=~Else,0=~EndIf,0=~EndLoop,0=~EndSub
setlocal nosmartindent

if exists("*GetFrameScriptIndent")
  finish
endif

function GetFrameScriptIndent()
  let lnum = prevnonblank(v:lnum - 1)

  if lnum == 0
    return 0
  endif

  if getline(v:lnum) =~ '^\s*\*'
    return cindent(v:lnum)
  endif

  let ind = indent(lnum)

  if getline(lnum) =~? '^\s*\%(If\|Loop\|Sub\)'
    let ind = ind + &sw
  endif

  if getline(v:lnum) =~? '^\s*\%(Else\|End\%(If\|Loop\|Sub\)\)'
    let ind = ind - &sw
  endif

  return ind
endfunction