El mi volas komprementi parentezojn (rondajn krampojn) kiam programi per Vim, la vim-skripton mi mem kod-skribis.

La vim-skripto faris Vim komprementi malferman krampon kaj ferman krampon per ^G^G.

inoremap <C-g><C-g> <C-r>=CompleteParent()<CR>

function! CompleteParent()
    let str = getline('.')
    let pos = col('.')

    if pos == 1 || pos == col('$') || str[(pos - 1) :] !~ ')'
    \ || (str[0: (pos - 2)] !~ '(' && str[-1:] == ')')
        call setline('.', str .')')
    else
        let i = 0
        let k = 0
        while i < 100
            let k = match(str[0: (pos - 2)], '(', k + 1)
            if k == -1
                break
            endif
            let i += 1
        endwhile

        let list = split(str[(pos - 1) :], ')', 1)
        let list[-(i + 2)] .= ')'
        call setline('.', str[0: (pos - 2)] .join(l:list, ')'))
    endif

    return "(\<left>"
endfunction