Vim C/C++的一键编译

开始用Vim差不多有两个月的时间, 一开始用Makefile 编译一整个项目无压力, 但是当写到单个文件的时候, 编译就比较麻烦了, 每次都得
:w
:!gcc -o 1.exe 1.c
:!1
非常麻烦...所以我都直接用的Code::Blocks...其实比Vim快多了哈哈...

但是昨晚折腾病发作, 想好好来配置一下, 于是花了一个晚上...改了一个能看得过去的一键编译.
原来的代码出自: http://www.vimer.cn/2009/10/11.html 这个域名好羡慕...
觉得他考虑的东西太多而且不好用, 自己折腾了折腾.
所幸vim的帮助文件非常全面, 改动他并不是难事.
代码及注释如下:

   "单个文件编译 Linux 下大概有问题
  "
  "
  map <F9> :call Do_OneFileMake()<CR>
  "判断操作系统
  if(has("win32") || has("win95") || has("win64") || has("win16"))
      let g:iswindows=
  else
      let g:iswindows=
 endif
 "函数体
 function Do_OneFileMake()
     "关闭之前可能存在的QucikFix窗口
     execute "cclose"
     "判断文件路径和工作目录是否相同(其实我也不知道为什么要判断
     if expand("%:p:h")!=getcwd()
         echohl WarningMsg | echo "Fail to make! This file is not in the current dir! " | echohl None
         return
     endif
     "sourcefilename 功能未知, 判断该类型是否被支持
     let sourcefileename=expand("%:t")
     if (sourcefileename=="" || (&filetype!="cpp" && &filetype!="c"))
         echohl WarningMsg | echo "Fail to make! Please select the right file!" | echohl None
         return
     endif
     "编译前先保存
     exec "w"
     "设置make参数,
     "Linux 和 Windows的情况不同, Linux的执行是./*.out Windows的是 *.exe Linux 下的没有经过测试o
     "makeprg 是 make的参数, 如果 makeprg=make 就执行真正的make.exe,  寻找目录下的makefile, 如果不是make的话这个参数就相当于makefile 的内容, 但是无论如何错误信息都会被送到QuickFix窗口.(暂时的粗浅理解
     "makeprg中空格和双引号都需要用反斜杠"\"转义
     if &filetype=="c"
         if g:iswindows==
            set makeprg=gcc\ -o\ \"%<.exe\"\ \"%\"
         else
            set makeprg=gcc\ -o\ \"%<\"\ \"%\"
         endif
     elseif &filetype=="cpp"
         if g:iswindows==
             set makeprg=g++\ -o\ \"%<.exe\"\ \"%\"
         else
             set makeprg=g++\ -o\ \"%<\"\ \"%\"
         endif
     endif
     "删除旧文件, outfilename是生成程序的完整路径
     let outfilename=expand("%:r").".exe"
     if filereadable(outfilename)
         if(g:iswindows==)
             let outdeletedsuccess=delete(outfilename)
         else
             let outdeletedsuccess=delete("./".outfilename) "doesn't work
         endif
         "如果文件删除不了报错
         if(outdeletedsuccess!=)
             set makeprg=make
             echohl WarningMsg | echo "Fail to make! I cannot delete the ".outfilename | echohl None
             return
         endif
     endif
     "静默编译, silent 关键字用于静默执行
     execute "silent make"
     set makeprg=make
     "编译后如果文件存在,说明编译成功, 执行之
     if filereadable(outfilename)
         if(g:iswindows==)
             execute "!\"%<.exe\""
             return
         else
             execute "!\"./%<.out\""
             return
         endif
     endif
     "不成功弹出错误信息, 即QuickFix窗口
     execute "silent copen 6"
 endfunction

以上.