我的vim 自动实例括号函数

不废话，直接上代码：

 """""""""""""""""""""""""""""""""""""""""""
 "自动实例括号
 """""""""""""""""""""""""""""""""""""""""""
 ""inoremap ( ()<ESC>i
 inoremap ( <c-r>=OpenPair('(',')')<CR>
 inoremap ) <c-r>=ClosePair(')')<CR>
 inoremap { {}<ESC>i
 inoremap } <c-r>=ClosePair('}')<CR>
 inoremap [ []<ESC>i
 inoremap ] <c-r>=ClosePair(']')<CR>
 inoremap " <c-r>=QuoteDelim('"')<CR>
 inoremap ' <c-r>=QuoteDelim("'")<CR>

 function! OpenPair(char1,char2)
     let line = getline('.')
     let col = col('.')
     if col('$') == col
         return a:char1 . a:char2. "\<Left>"
     else
         return a:char1
     endif
 endfunction

 function! ClosePair(char)
     if getline('.')[col('.') - ] == a:char
         return "\<Right>"
     else
         return a:char
     endif
 endfunction

 function! QuoteDelim(char)
     let line = getline('.')
     let col = col('.')
     if line[col - ] == "\\"
         "Inserting a quoted quotation mark into the string
         return a:char
     elseif line[col - ] == a:char
         "Escaping out of the string
         return "\<Right>"
     else
         "Starting a string
         return a:char.a:char."\<Esc>i"
     endif
 endf