Virtcols2Vartabs()

D2307.vim

" File:		D2307.vim
" Created:	2018 Jun 29
" Last Change:	2018 Jun 29
" Version:      0.1
" Author:	Andy Wokula <[email protected]>
" License:	Vim License, see :h license

" Virtcols2Vartabs({virt-columns})	(copy)
"
"   return differences list (list of number) from explicit virtual columns,
"   suitable for setting 'varsofttabstop'.
"
"   {virt-columns}	(list of number) virtual columns (each 2 or
"			greater), in ascending order
"
"   If {virt-columns} starts with 1, then the result starts with 0 which is
"   probably not a valid vartabs entry.
"
"   Example:
"	:echo Virtcols2Vartabs([4,13,23,31,60])
"	=> [3, 9, 10, 8, 29]
"
"   Usage:
"	:let &varsofttabstop = join(Virtcols2Vartabs([4,13,23,31,60]), ',')
"
"   vim_dev: Off-by-one error in varsofttabstop description?
"   2018 Jun 29 François Ingelrest
"

func! Virtcols2Vartabs(vcols) "{{{
    if empty(a:vcols)
	return []
    endif
    return map(PairList(a:vcols, [1] + a:vcols), 'v:val[0] - v:val[1]')
endfunc "}}}

""func! PairList(list1, list2) "{{{
""    let len = min([len(a:list1), len(a:list2)])
""    return map(range(len), '[a:list1[v:val], a:list2[v:val]]')
""endfunc "}}}