用于Gvim 或 Vim 配置文件的一键编译与运行函数(注:需要机器上安装了GCC才行) 本代码只加入了对C/C++的编译与运行,如果要加入其语言的可以参考此代码加入即可 同时,本代码加入了对Windows下用Gvim编译UTF-8编码格式的源文件时中文乱码的解 决方法(也就是在编译选项中加入了 “-fexec-charset=gbk”)。 将上面的代码加入到_vimrc文件里即可1. [代码]gvim配置文件    "------------------------------------------------------------------------------"  "------------------------------------------------------------------------------if(has("win32") || has("win64") || has("win95") || has("win16"))    let g:iswindows = 1else    let g:iswindows = 0endif "------------------------------------------------------------------------------"  "------------------------------------------------------------------------------if has("gui_running")    let g:isGUI = 1else    let g:isGUI = 0endif "------------------------------------------------------------------------------"  "------------------------------------------------------------------------------" F9 一键保存、编译、连接存并运行map :call Run()imap :call Run() " Ctrl + F9 一键保存并编译map :call Compile()imap :call Compile() " Ctrl + F10 一键保存并连接map :call Link()imap :call Link() let s:LastShellReturn_C = 0let s:LastShellReturn_L = 0let s:ShowWarning = 1let s:Obj_Extension = '.o'let s:Exe_Extension = '.exe'let s:Sou_Error = 0 let s:windows_CFlags = 'gcc\ -fexec-charset=gbk\ -Wall\ -g\ -O0\ -c\ %\ -o\ %let s:linux_CFlags = 'gcc\ -Wall\ -g\ -O0\ -c\ %\ -o\ % let s:windows_CPPFlags = 'g++\ -fexec-charset=gbk\ -Wall\ -g\ -O0\ -c\ %\ -o\ %let s:linux_CPPFlags = 'g++\ -Wall\ -g\ -O0\ -c\ %\ -o\ % func! Compile()    exe ":ccl"    exe ":update"    if expand("%:e") == "c" || expand("%:e") == "cpp" || expand("%:e") == "cxx"        let s:Sou_Error = 0        let s:LastShellReturn_C = 0        let Sou = expand("%:p")        let Obj = expand("%:p:r").s:Obj_Extension        let Obj_Name = expand("%:p:t:r").s:Obj_Extension        let v:statusmsg = ''        if !filereadable(Obj) || (filereadable(Obj) && (getftime(Obj)            redraw!            if expand("%:e") == "c"                if g:iswindows                    exe ":setlocal makeprg=".s:windows_CFlags                else                    exe ":setlocal makeprg=".s:linux_CFlags                endif                echohl WarningMsg | echo " compiling..."                silent make            elseif expand("%:e") == "cpp" || expand("%:e") == "cxx"                if g:iswindows                    exe ":setlocal makeprg=".s:windows_CPPFlags                else                    exe ":setlocal makeprg=".s:linux_CPPFlags                endif                echohl WarningMsg | echo " compiling..."                silent make            endif            redraw!            if v:shell_error != 0                let s:LastShellReturn_C = v:shell_error            endif            if g:iswindows                if s:LastShellReturn_C != 0                    exe ":bo cope"                    echohl WarningMsg | echo " compilation failed"                else                    if s:ShowWarning                        exe ":bo cw"                    endif                    echohl WarningMsg | echo " compilation successful"                endif            else                if empty(v:statusmsg)                    echohl WarningMsg | echo " compilation successful"                else                    exe ":bo cope"                endif            endif        else            echohl WarningMsg | echo ""Obj_Name"is up to date"        endif    else        let s:Sou_Error = 1        echohl WarningMsg | echo " please choose the correct source file"    endif    exe ":setlocal makeprg=make"endfunc func! Link()    call Compile()    if s:Sou_Error || s:LastShellReturn_C != 0        return    endif    let s:LastShellReturn_L = 0    let Sou = expand("%:p")    let Obj = expand("%:p:r").s:Obj_Extension    if g:iswindows        let Exe = expand("%:p:r").s:Exe_Extension        let Exe_Name = expand("%:p:t:r").s:Exe_Extension    else        let Exe = expand("%:p:r")        let Exe_Name = expand("%:p:t:r")    endif    let v:statusmsg = ''    if filereadable(Obj) && (getftime(Obj) >= getftime(Sou))        redraw!        if !executable(Exe) || (executable(Exe) && getftime(Exe)            if expand("%:e") == "c"                setlocal makeprg=gcc\ -o\ %                echohl WarningMsg | echo " linking..."                silent make            elseif expand("%:e") == "cpp" || expand("%:e") == "cxx"                setlocal makeprg=g++\ -o\ %                echohl WarningMsg | echo " linking..."                silent make            endif            redraw!            if v:shell_error != 0                let s:LastShellReturn_L = v:shell_error            endifhttp://www.huiyi8.com/hunsha/hanshi/            if g:iswindows韩式婚纱照片                if s:LastShellReturn_L != 0                    exe ":bo cope"                    echohl WarningMsg | echo " linking failed"                else                    if s:ShowWarning                        exe ":bo cw"                    endif                    echohl WarningMsg | echo " linking successful"                endif            else                if empty(v:statusmsg)                    echohl WarningMsg | echo " linking successful"                else                    exe ":bo cope"                endif            endif        else            echohl WarningMsg | echo ""Exe_Name"is up to date"        endif    endif    setlocal makeprg=makeendfunc func! Run()    let s:ShowWarning = 0    call Link()    let s:ShowWarning = 1    if s:Sou_Error || s:LastShellReturn_C != 0 || s:LastShellReturn_L != 0        return    endif    let Sou = expand("%:p")    let Obj = expand("%:p:r").s:Obj_Extension    if g:iswindows        let Exe = expand("%:p:r").s:Exe_Extension    else        let Exe = expand("%:p:r")    endif    if executable(Exe) && getftime(Exe) >= getftime(Obj) && getftime(Obj) >= getftime(Sou)        redraw!        echohl WarningMsg | echo " running..."        if g:iswindows            exe ":!%        else            if g:isGUI                exe ":!gnome-terminal -e ./%            else                exe ":!./%            endif        endif        redraw!        echohl WarningMsg | echo " running finish"    endifendfunc2. [图片] 无标题.png    
11-08 08:27