view runtime/indent/framescript.vim @ 18141:2cc67e54edf8 v8.1.2065

patch 8.1.2065: compiler warning building non-GUI with MinGW. Commit: https://github.com/vim/vim/commit/910c378d9342e0de8c6736c83ebdbbb597267056 Author: Bram Moolenaar <Bram@vim.org> Date: Sun Sep 22 14:11:50 2019 +0200 patch 8.1.2065: compiler warning building non-GUI with MinGW. Problem: Compiler warning building non-GUI with MinGW. Solution: Adjust #ifdefs. (Yegappan Lakshmanan, closes https://github.com/vim/vim/issues/4964)
author Bram Moolenaar <Bram@vim.org>
date Sun, 22 Sep 2019 14:15:04 +0200
parents d0a20101ecb2
children 9c221ad9634a
line wrap: on
line source

" Vim indent file
" Language:             FrameScript
" Previous 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 + shiftwidth()
  endif

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

  return ind
endfunction