実行時にフォントをすばやく切り替える

フォントはメニューからGVimで手動で選択できますが、手元のタスクに応じて切り替えたいフォントがいくつかあります（小さなビットマップ、大きなOTF ...など）。

vimrcで事前定義されたフォントのリストを循環するようにキーバインドを設定する方法はありますか？

基本的なアイデアは次のようになります。

" Define a list of the fonts you want to use, and the index in the 
" list of the default font. See :help Lists
let g:fc_list = [
\   "DejaVu Sans Mono 9",
\   "Source Code Pro 12",
\   "GohuFont 11"
\   ]
let g:fc_current = 0

" Set default font
let &guifont = g:fc_list[g:fc_current]

function! FontCycle()
  " Increment circular list. See :help expr-%
  let g:fc_current = (g:fc_current + 1) % len(g:fc_list)
  let &guifont = g:fc_list[g:fc_current]
endfunction

noremap <leader>fc :call FontCycle()<cr>

.vimrcファイルで次のように定義しています。

set guifont=DejaVu\ Sans\ Mono\ for\ Powerline\ 10

したがって、このようにマッピングとして設定できます...

nmap <Leader>f :set guifont=DejaVu\ Sans\ Mono\ for\ Powerline\ 10<CR>

他のフォントのマッピングを追加します。