Mercurial > vim
view runtime/indent/tf.vim @ 18257:f5a6c8261f64 v8.1.2123
patch 8.1.2123: parsing CSI sequence is messy
Commit: https://github.com/vim/vim/commit/c3e555b22f24f93aabd31943c35a9228abb6ecb6
Author: Bram Moolenaar <Bram@vim.org>
Date: Tue Oct 8 20:15:39 2019 +0200
patch 8.1.2123: parsing CSI sequence is messy
Problem: Parsing CSI sequence is messy.
Solution: Generalize parsing a CSI sequence.
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Tue, 08 Oct 2019 20:30:04 +0200 |
parents | 1218c5353e2b |
children | 4d76b3e07c07 |
line wrap: on
line source
" Vim indent file " Language: tf (TinyFugue) " Maintainer: Christian J. Robinson <heptite@gmail.com> " URL: http://www.vim.org/scripts/script.php?script_id=174 " Last Change: 2017 Feb 25 " Only load this indent file when no other was loaded. if exists("b:did_indent") finish endif let b:did_indent = 1 setlocal indentexpr=GetTFIndent() setlocal indentkeys-=0{,0} indentkeys-=0# indentkeys-=: setlocal indentkeys+==/endif,=/then,=/else,=/done,0; " Only define the function once: if exists("*GetTFIndent") finish endif function GetTFIndent() " Find a non-blank line above the current line: let lnum = prevnonblank(v:lnum - 1) " No indent for the start of the file: if lnum == 0 return 0 endif let ind = indent(lnum) let line = getline(lnum) " No indentation if the previous line didn't end with "\": " (Could be annoying, but it lets you know if you made a mistake.) if line !~ '\\$' return 0 endif if line =~ '\(/def.*\\\|/for.*\(%;\s*\)\@\<!\\\)$' let ind = ind + shiftwidth() elseif line =~ '\(/if\|/else\|/then\)' if line !~ '/endif' let ind = ind + shiftwidth() endif elseif line =~ '/while' if line !~ '/done' let ind = ind + shiftwidth() endif endif let line = getline(v:lnum) if line =~ '\(/else\|/endif\|/then\)' if line !~ '/if' let ind = ind - shiftwidth() endif elseif line =~ '/done' if line !~ '/while' let ind = ind - shiftwidth() endif endif " Comments at the beginning of a line: if line =~ '^\s*;' let ind = 0 endif return ind endfunction