diff options
author | Bram Moolenaar <Bram@vim.org> | 2012-04-25 19:07:41 +0200 |
---|---|---|
committer | Bram Moolenaar <Bram@vim.org> | 2012-04-25 19:07:41 +0200 |
commit | d38b055ab81f194d50790b21c627beed62983d46 (patch) | |
tree | fdb2929bf26b347a67e07868234c7c32e44f2405 /runtime/ftplugin/fortran.vim | |
parent | 7f51a82c1b340c0442690ab2d4408d74c97d696a (diff) |
Updated runtime files.
Diffstat (limited to 'runtime/ftplugin/fortran.vim')
-rw-r--r-- | runtime/ftplugin/fortran.vim | 19 |
1 files changed, 12 insertions, 7 deletions
diff --git a/runtime/ftplugin/fortran.vim b/runtime/ftplugin/fortran.vim index 948e216f6e..110dab3a8d 100644 --- a/runtime/ftplugin/fortran.vim +++ b/runtime/ftplugin/fortran.vim @@ -1,11 +1,12 @@ " Vim settings file -" Language: Fortran90 (and Fortran95, Fortran77, F and elf90) -" Version: 0.47 -" Last Change: 2011 December 28 +" Language: Fortran 2008 (and older: Fortran 2003, 95, 90, 77, 66) +" Version: 0.48 +" Last Change: 2012 Apr. 18 " Maintainer: Ajit J. Thakkar <ajit@unb.ca>; <http://www.unb.ca/chem/ajit/> " Usage: Do :help fortran-plugin from Vim " Credits: -" Useful suggestions were made by Stefano Zacchiroli and Hendrik Merx. +" Useful suggestions were made by Stefano Zacchiroli, Hendrik Merx, and Ben +" Fritz. " Only do these settings when not done yet for this buffer if exists("b:did_ftplugin") @@ -28,7 +29,7 @@ if !exists("b:fortran_fixed_source") " User guarantees fixed source form let b:fortran_fixed_source = 1 else - " f90 and f95 allow both fixed and free source form + " Modern Fortran allows both fixed and free source form " assume fixed source form unless signs of free source form " are detected in the first five columns of the first s:lmax lines " Detection becomes more accurate and time-consuming if more lines @@ -79,7 +80,7 @@ endif setlocal fo+=tcql setlocal include=^\\c#\\=\\s*include\\s\\+ -setlocal suffixesadd+=.f95,.f90,.for,.f,.F,.f77,.ftn,.fpp +setlocal suffixesadd+=.f08,.f03,.f95,.f90,.for,.f,.F,.f77,.ftn,.fpp " Define patterns for the matchit plugin if !exists("b:match_words") @@ -89,6 +90,7 @@ if !exists("b:match_words") let s:notprocedure = '\%(\s\+procedure\>\)\@!' let b:match_ignorecase = 1 let b:match_words = + \ '(:),' . \ '\<select\s*case\>:' . s:notselect. '\<case\>:\<end\s*select\>,' . \ s:notelse . '\<if\s*(.\+)\s*then\>:' . \ '\<else\s*\%(if\s*(.\+)\s*then\)\=\>:\<end\s*if\>,'. @@ -96,6 +98,9 @@ if !exists("b:match_words") \ s:notend . '\<do\>:\<end\s*do\>,'. \ s:notelse . '\<where\>:\<elsewhere\>:\<end\s*where\>,'. \ s:notend . '\<type\s*[^(]:\<end\s*type\>,'. + \ s:notend . '\<forall\>:\<end\s*forall\>,'. + \ s:notend . '\<associate\>:\<end\s*associate\>,'. + \ s:notend . '\<enum\>:\<end\s*enum\>,'. \ s:notend . '\<interface\>:\<end\s*interface\>,'. \ s:notend . '\<subroutine\>:\<end\s*subroutine\>,'. \ s:notend . '\<function\>:\<end\s*function\>,'. @@ -105,7 +110,7 @@ endif " File filters for :browse e if has("gui_win32") && !exists("b:browsefilter") - let b:browsefilter = "Fortran Files (*.f;*.F;*.for;*.f77;*.f90;*.f95;*.fpp;*.ftn)\t*.f;*.F;*.for;*.f77;*.f90;*.f95;*.fpp;*.ftn\n" . + let b:browsefilter = "Fortran Files (*.f;*.for;*.f77;*.f90;*.f95;*.f03;*.f08;*.fpp;*.ftn)\t*.f;*.for;*.f77;*.f90;*.f95;*.f03;*.f08;*.fpp;*.ftn\n" . \ "All Files (*.*)\t*.*\n" endif |