annotate runtime/syntax/fortran.vim @ 6436:26a20ce3532c v7.4.548

updated for version 7.4.548 Problem: Function name not recognized correctly when inside a function. Solution: Don't check for an alpha character.
author Bram Moolenaar <bram@vim.org>
date Sat, 13 Dec 2014 20:50:09 +0100
parents 11d40fc82f11
children 435956324539
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1 " Vim syntax file
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
2 " Language: Fortran 2008 (and earlier versions: 2003, 95, 90, and 77)
3682
11d40fc82f11 Updated runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3281
diff changeset
3 " Version: 0.94
11d40fc82f11 Updated runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3281
diff changeset
4 " Last Change: 2012 June 18
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5 " Maintainer: Ajit J. Thakkar (ajit AT unb.ca); <http://www.unb.ca/chem/ajit/>
2370
454f314d0e61 Make it possible to load Perl dynamically on Unix. (James Vega)
Bram Moolenaar <bram@vim.org>
parents: 2034
diff changeset
6 " Usage: For instructions, do :help fortran-syntax from Vim
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
7 " Credits:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
8 " Version 0.1 was based on the fortran 77 syntax file by Mario Eusebio and
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
9 " Preben Guldberg. Useful suggestions were made by: Andrej Panjkov,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
10 " Bram Moolenaar, Thomas Olsen, Michael Sternberg, Christian Reile,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
11 " Walter Dieudonné, Alexander Wagner, Roman Bertle, Charles Rendleman,
2370
454f314d0e61 Make it possible to load Perl dynamically on Unix. (James Vega)
Bram Moolenaar <bram@vim.org>
parents: 2034
diff changeset
12 " Andrew Griffiths, Joe Krahn, and Hendrik Merx.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
13
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
14 if exists("b:current_syntax")
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
15 finish
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
16 endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
17
3237
91e53bcb7946 Updated runtime files.
Bram Moolenaar <bram@vim.org>
parents: 2377
diff changeset
18 let s:cpo_save = &cpo
91e53bcb7946 Updated runtime files.
Bram Moolenaar <bram@vim.org>
parents: 2377
diff changeset
19 set cpo&vim
91e53bcb7946 Updated runtime files.
Bram Moolenaar <bram@vim.org>
parents: 2377
diff changeset
20
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
21 " Choose fortran_dialect using the priority:
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
22 " source file directive > buffer-local value > global value > default
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
23 " try using directive in first three lines of file
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
24 let b:fortran_retype = getline(1)." ".getline(2)." ".getline(3)
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
25 if b:fortran_retype =~? '\<fortran_dialect\s*=\s*F\>'
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
26 let b:fortran_dialect = "F"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
27 elseif b:fortran_retype =~? '\<fortran_dialect\s*=\s*f08\>'
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
28 let b:fortran_dialect = "f08"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
29 elseif !exists("b:fortran_dialect")
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
30 if exists("g:fortran_dialect") && g:fortran_dialect =~# '\<F\|f08\>'
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
31 " try global variable
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
32 let b:fortran_dialect = g:fortran_dialect
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
33 else " nothing found, so use default
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
34 let b:fortran_dialect = "f08"
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
35 endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
36 endif
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
37 unlet! b:fortran_retype
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
38 " make sure buffer-local value is not invalid
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
39 if b:fortran_dialect !~# '\<F\|f08\>'
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
40 let b:fortran_dialect = "f08"
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
41 endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
42
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
43 " Choose between fixed and free source form if this hasn't been done yet
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
44 if !exists("b:fortran_fixed_source")
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
45 if b:fortran_dialect == "F"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
46 " F requires free source form
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
47 let b:fortran_fixed_source = 0
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
48 elseif exists("fortran_free_source")
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
49 " User guarantees free source form for all fortran files
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
50 let b:fortran_fixed_source = 0
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
51 elseif exists("fortran_fixed_source")
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
52 " User guarantees fixed source form for all fortran files
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
53 let b:fortran_fixed_source = 1
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
54 else
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
55 " Modern fortran still allows both free and fixed source form.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
56 " Assume fixed source form unless signs of free source form
2377
878562053ba3 Update Fortran indent and syntax file. (Ajit Thakkar)
Bram Moolenaar <bram@vim.org>
parents: 2370
diff changeset
57 " are detected in the first five columns of the first s:lmax lines.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
58 " Detection becomes more accurate and time-consuming if more lines
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
59 " are checked. Increase the limit below if you keep lots of comments at
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
60 " the very top of each file and you have a fast computer.
2377
878562053ba3 Update Fortran indent and syntax file. (Ajit Thakkar)
Bram Moolenaar <bram@vim.org>
parents: 2370
diff changeset
61 let s:lmax = 500
878562053ba3 Update Fortran indent and syntax file. (Ajit Thakkar)
Bram Moolenaar <bram@vim.org>
parents: 2370
diff changeset
62 if ( s:lmax > line("$") )
878562053ba3 Update Fortran indent and syntax file. (Ajit Thakkar)
Bram Moolenaar <bram@vim.org>
parents: 2370
diff changeset
63 let s:lmax = line("$")
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
64 endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
65 let b:fortran_fixed_source = 1
2377
878562053ba3 Update Fortran indent and syntax file. (Ajit Thakkar)
Bram Moolenaar <bram@vim.org>
parents: 2370
diff changeset
66 let s:ln=1
878562053ba3 Update Fortran indent and syntax file. (Ajit Thakkar)
Bram Moolenaar <bram@vim.org>
parents: 2370
diff changeset
67 while s:ln <= s:lmax
878562053ba3 Update Fortran indent and syntax file. (Ajit Thakkar)
Bram Moolenaar <bram@vim.org>
parents: 2370
diff changeset
68 let s:test = strpart(getline(s:ln),0,5)
878562053ba3 Update Fortran indent and syntax file. (Ajit Thakkar)
Bram Moolenaar <bram@vim.org>
parents: 2370
diff changeset
69 if s:test !~ '^[Cc*]' && s:test !~ '^ *[!#]' && s:test =~ '[^ 0-9\t]' && s:test !~ '^[ 0-9]*\t'
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
70 let b:fortran_fixed_source = 0
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
71 break
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
72 endif
2377
878562053ba3 Update Fortran indent and syntax file. (Ajit Thakkar)
Bram Moolenaar <bram@vim.org>
parents: 2370
diff changeset
73 let s:ln = s:ln + 1
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
74 endwhile
2377
878562053ba3 Update Fortran indent and syntax file. (Ajit Thakkar)
Bram Moolenaar <bram@vim.org>
parents: 2370
diff changeset
75 unlet! s:lmax s:ln s:test
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
76 endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
77 endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
78
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
79 syn case ignore
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
80
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
81 if b:fortran_fixed_source == 1
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
82 syn match fortranConstructName "^\s\{6,}\zs\a\w*\ze\s*:"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
83 else
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
84 syn match fortranConstructName "^\s*\zs\a\w*\ze\s*:"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
85 endif
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
86 if exists("fortran_more_precise")
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
87 syn match fortranConstructName "\(\<end\s*do\s\+\)\@<=\a\w*"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
88 syn match fortranConstructName "\(\<end\s*if\s\+\)\@<=\a\w*"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
89 syn match fortranConstructName "\(\<end\s*select\s\+\)\@<=\a\w*"
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
90 endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
91
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
92 syn match fortranUnitHeader "\<end\>"
819
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 7
diff changeset
93 syn match fortranType "\<character\>"
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 7
diff changeset
94 syn match fortranType "\<complex\>"
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 7
diff changeset
95 syn match fortranType "\<integer\>"
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
96 syn keyword fortranType intrinsic
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
97 syn match fortranType "\<implicit\>"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
98 syn keyword fortranStructure dimension
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
99 syn keyword fortranStorageClass parameter save
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
100 syn match fortranUnitHeader "\<subroutine\>"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
101 syn keyword fortranCall call
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
102 syn match fortranUnitHeader "\<function\>"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
103 syn match fortranUnitHeader "\<program\>"
819
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 7
diff changeset
104 syn keyword fortranKeyword return stop
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
105 syn keyword fortranConditional else then
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
106 syn match fortranConditional "\<if\>"
3256
ba708ee8d69d Updated runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3237
diff changeset
107 syn match fortranConditionalOb "\<if\s*(.*)\s*\d\+\s*,\s*\d\+\s*,\s*\d\+\s*$"
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
108 syn match fortranRepeat "\<do\>"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
109
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
110 syn keyword fortranTodo contained todo fixme
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
111
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
112 "Catch errors caused by too many right parentheses
819
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 7
diff changeset
113 syn region fortranParen transparent start="(" end=")" contains=ALLBUT,fortranParenError,@fortranCommentGroup,cIncluded,@spell
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
114 syn match fortranParenError ")"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
115
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
116 syn match fortranOperator "\.\s*n\=eqv\s*\."
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
117 syn match fortranOperator "\.\s*\(and\|or\|not\)\s*\."
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
118 syn match fortranOperator "\(+\|-\|/\|\*\)"
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
119 syn match fortranTypeOb "\<character\s*\*"
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
120
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
121 syn match fortranBoolean "\.\s*\(true\|false\)\s*\."
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
122
819
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 7
diff changeset
123 syn keyword fortranReadWrite backspace close endfile inquire open print read rewind write
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
124
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
125 "If tabs are allowed then the left margin checks do not work
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
126 if exists("fortran_have_tabs")
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
127 syn match fortranTab "\t" transparent
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
128 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
129 syn match fortranTab "\t"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
130 endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
131
819
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 7
diff changeset
132 syn keyword fortranIO access blank direct exist file fmt form formatted iostat name named nextrec number opened rec recl sequential status unformatted unit
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
133
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
134 syn keyword fortranIntrinsicR alog alog10 amax0 amax1 amin0 amin1 amod cabs ccos cexp clog csin csqrt dabs dacos dasin datan datan2 dcos dcosh ddim dexp dint dlog dlog10 dmax1 dmin1 dmod dnint dsign dsin dsinh dsqrt dtan dtanh float iabs idim idint idnint ifix isign max0 max1 min0 min1 sngl
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
135
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
136 " Intrinsics provided by some vendors
3256
ba708ee8d69d Updated runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3237
diff changeset
137 syn keyword fortranExtraIntrinsic algama cdabs cdcos cdexp cdlog cdsin cdsqrt cqabs cqcos cqexp cqlog cqsin cqsqrt dcmplx dconjg derf derfc dfloat dgamma dimag dlgama iqint qabs qacos qasin qatan qatan2 qcmplx qconjg qcos qcosh qdim qerf qerfc qexp qgamma qimag qlgama qlog qlog10 qmax1 qmin1 qmod qnint qsign qsin qsinh qsqrt qtan qtanh
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
138
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
139 syn keyword fortranIntrinsic abs acos aimag aint anint asin atan atan2 char cmplx conjg cos cosh exp ichar index int log log10 max min nint sign sin sinh sqrt tan tanh
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
140 syn match fortranIntrinsic "\<len\s*[(,]"me=s+3
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
141 syn match fortranIntrinsic "\<real\s*("me=s+4
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
142 syn match fortranType "\<implicit\s\+real"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
143 syn match fortranType "^\s*real\>"
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
144 syn match fortranIntrinsic "\<logical\s*("me=s+7
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
145 syn match fortranType "\<implicit\s\+logical"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
146 syn match fortranType "^\s*logical\>"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
147
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
148 "Numbers of various sorts
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
149 " Integers
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
150 syn match fortranNumber display "\<\d\+\(_\a\w*\)\=\>"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
151 " floating point number, without a decimal point
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
152 syn match fortranFloatIll display "\<\d\+[deq][-+]\=\d\+\(_\a\w*\)\=\>"
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
153 " floating point number, starting with a decimal point
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
154 syn match fortranFloatIll display "\.\d\+\([deq][-+]\=\d\+\)\=\(_\a\w*\)\=\>"
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
155 " floating point number, no digits after decimal
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
156 syn match fortranFloatIll display "\<\d\+\.\([deq][-+]\=\d\+\)\=\(_\a\w*\)\=\>"
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
157 " floating point number, D or Q exponents
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
158 syn match fortranFloatIll display "\<\d\+\.\d\+\([dq][-+]\=\d\+\)\=\(_\a\w*\)\=\>"
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
159 " floating point number
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
160 syn match fortranFloat display "\<\d\+\.\d\+\(e[-+]\=\d\+\)\=\(_\a\w*\)\=\>"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
161 " Numbers in formats
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
162 syn match fortranFormatSpec display "\d*f\d\+\.\d\+"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
163 syn match fortranFormatSpec display "\d*e[sn]\=\d\+\.\d\+\(e\d+\>\)\="
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
164 syn match fortranFormatSpec display "\d*\(d\|q\|g\)\d\+\.\d\+\(e\d+\)\="
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
165 syn match fortranFormatSpec display "\d\+x\>"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
166 " The next match cannot be used because it would pick up identifiers as well
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
167 " syn match fortranFormatSpec display "\<\(a\|i\)\d\+"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
168
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
169 " Numbers as labels
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
170 syn match fortranLabelNumber display "^\d\{1,5}\s"me=e-1
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
171 syn match fortranLabelNumber display "^ \d\{1,4}\s"ms=s+1,me=e-1
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
172 syn match fortranLabelNumber display "^ \d\{1,3}\s"ms=s+2,me=e-1
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
173 syn match fortranLabelNumber display "^ \d\d\=\s"ms=s+3,me=e-1
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
174 syn match fortranLabelNumber display "^ \d\s"ms=s+4,me=e-1
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
175
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
176 if exists("fortran_more_precise")
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
177 " Numbers as targets
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
178 syn match fortranTarget display "\(\<if\s*(.\+)\s*\)\@<=\(\d\+\s*,\s*\)\{2}\d\+\>"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
179 syn match fortranTarget display "\(\<do\s\+\)\@<=\d\+\>"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
180 syn match fortranTarget display "\(\<go\s*to\s*(\=\)\@<=\(\d\+\s*,\s*\)*\d\+\>"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
181 endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
182
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
183 syn keyword fortranTypeR external
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
184 syn keyword fortranIOR format
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
185 syn match fortranKeywordR "\<continue\>"
2370
454f314d0e61 Make it possible to load Perl dynamically on Unix. (James Vega)
Bram Moolenaar <bram@vim.org>
parents: 2034
diff changeset
186 syn match fortranKeyword "^\s*\d\+\s\+continue\>"
3256
ba708ee8d69d Updated runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3237
diff changeset
187 syn match fortranKeyword "\<go\s*to\>"
ba708ee8d69d Updated runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3237
diff changeset
188 syn match fortranKeywordDel "\<go\s*to\ze\s\+.*,\s*(.*$"
ba708ee8d69d Updated runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3237
diff changeset
189 syn match fortranKeywordOb "\<go\s*to\ze\s*(\d\+.*$"
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
190 syn region fortranStringR start=+'+ end=+'+ contains=fortranContinueMark,fortranLeftMargin,fortranSerialNumber
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
191 syn keyword fortranIntrinsicR dim lge lgt lle llt mod
3256
ba708ee8d69d Updated runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3237
diff changeset
192 syn keyword fortranKeywordDel assign pause
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
193
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
194 syn match fortranType "\<type\>"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
195 syn keyword fortranType none
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
196
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
197 syn keyword fortranStructure private public intent optional
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
198 syn keyword fortranStructure pointer target allocatable
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
199 syn keyword fortranStorageClass in out
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
200 syn match fortranStorageClass "\<kind\s*="me=s+4
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
201 syn match fortranStorageClass "\<len\s*="me=s+3
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
202
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
203 syn match fortranUnitHeader "\<module\>"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
204 syn keyword fortranUnitHeader use only contains
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
205 syn keyword fortranUnitHeader result operator assignment
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
206 syn match fortranUnitHeader "\<interface\>"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
207 syn match fortranUnitHeader "\<recursive\>"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
208 syn keyword fortranKeyword allocate deallocate nullify cycle exit
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
209 syn match fortranConditional "\<select\>"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
210 syn keyword fortranConditional case default where elsewhere
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
211
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
212 syn match fortranOperator "\(\(>\|<\)=\=\|==\|/=\|=\)"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
213 syn match fortranOperator "=>"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
214
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
215 syn region fortranString start=+"+ end=+"+ contains=fortranLeftMargin,fortranContinueMark,fortranSerialNumber
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
216 syn keyword fortranIO pad position action delim readwrite
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
217 syn keyword fortranIO eor advance nml
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
218
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
219 syn keyword fortranIntrinsic adjustl adjustr all allocated any associated bit_size btest ceiling count cshift date_and_time digits dot_product eoshift epsilon exponent floor fraction huge iand ibclr ibits ibset ieor ior ishft ishftc lbound len_trim matmul maxexponent maxloc maxval merge minexponent minloc minval modulo mvbits nearest pack precision present product radix random_number random_seed range repeat reshape rrspacing
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
220 syn keyword fortranIntrinsic scale scan selected_int_kind selected_real_kind set_exponent shape size spacing spread sum system_clock tiny transpose trim ubound unpack verify
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
221 syn match fortranIntrinsic "\<not\>\(\s*\.\)\@!"me=s+3
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
222 syn match fortranIntrinsic "\<kind\>\s*[(,]"me=s+4
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
223
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
224 syn match fortranUnitHeader "\<end\s*function"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
225 syn match fortranUnitHeader "\<end\s*interface"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
226 syn match fortranUnitHeader "\<end\s*module"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
227 syn match fortranUnitHeader "\<end\s*program"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
228 syn match fortranUnitHeader "\<end\s*subroutine"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
229 syn match fortranRepeat "\<end\s*do"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
230 syn match fortranConditional "\<end\s*where"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
231 syn match fortranConditional "\<select\s*case"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
232 syn match fortranConditional "\<end\s*select"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
233 syn match fortranType "\<end\s*type"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
234 syn match fortranType "\<in\s*out"
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
235
3682
11d40fc82f11 Updated runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3281
diff changeset
236 syn keyword fortranType procedure
11d40fc82f11 Updated runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3281
diff changeset
237 syn match fortranType "\<module\ze\s\+procedure\>"
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
238 syn keyword fortranIOR namelist
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
239 syn keyword fortranConditionalR while
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
240 syn keyword fortranIntrinsicR achar iachar transfer
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
241
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
242 syn keyword fortranInclude include
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
243 syn keyword fortranStorageClassR sequence
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
244
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
245 syn match fortranConditional "\<end\s*if"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
246 syn match fortranIO contains=fortranOperator "\<e\(nd\|rr\)\s*=\s*\d\+"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
247 syn match fortranConditional "\<else\s*if"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
248
3256
ba708ee8d69d Updated runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3237
diff changeset
249 syn keyword fortranUnitHeaderOb entry
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
250 syn match fortranTypeR display "double\s\+precision"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
251 syn match fortranTypeR display "double\s\+complex"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
252 syn match fortranUnitHeaderR display "block\s\+data"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
253 syn keyword fortranStorageClassR common equivalence data
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
254 syn keyword fortranIntrinsicR dble dprod
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
255 syn match fortranOperatorR "\.\s*[gl][et]\s*\."
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
256 syn match fortranOperatorR "\.\s*\(eq\|ne\)\s*\."
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
257
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
258 syn keyword fortranRepeat forall
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
259 syn match fortranRepeat "\<end\s*forall"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
260 syn keyword fortranIntrinsic null cpu_time
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
261 syn match fortranType "\<elemental\>"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
262 syn match fortranType "\<pure\>"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
263 if exists("fortran_more_precise")
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
264 syn match fortranConstructName "\(\<end\s*forall\s\+\)\@<=\a\w*\>"
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
265 endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
266
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
267 if b:fortran_dialect == "f08"
2370
454f314d0e61 Make it possible to load Perl dynamically on Unix. (James Vega)
Bram Moolenaar <bram@vim.org>
parents: 2034
diff changeset
268 " F2003
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
269 syn keyword fortranIntrinsic command_argument_count get_command get_command_argument get_environment_variable is_iostat_end is_iostat_eor move_alloc new_line selected_char_kind same_type_as extends_type_of
2370
454f314d0e61 Make it possible to load Perl dynamically on Unix. (James Vega)
Bram Moolenaar <bram@vim.org>
parents: 2034
diff changeset
270 " ISO_C_binding
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
271 syn keyword fortranConstant c_null_char c_alert c_backspace c_form_feed c_new_line c_carriage_return c_horizontal_tab c_vertical_tab
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
272 syn keyword fortranConstant c_int c_short c_long c_long_long c_signed_char c_size_t c_int8_t c_int16_t c_int32_t c_int64_t c_int_least8_t c_int_least16_t c_int_least32_t c_int_least64_t c_int_fast8_t c_int_fast16_t c_int_fast32_t c_int_fast64_t c_intmax_t C_intptr_t c_float c_double c_long_double c_float_complex c_double_complex c_long_double_complex c_bool c_char c_null_ptr c_null_funptr
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
273 syn keyword fortranIntrinsic iso_c_binding c_loc c_funloc c_associated c_f_pointer c_f_procpointer
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
274 syn keyword fortranType c_ptr c_funptr
2370
454f314d0e61 Make it possible to load Perl dynamically on Unix. (James Vega)
Bram Moolenaar <bram@vim.org>
parents: 2034
diff changeset
275 " ISO_Fortran_env
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
276 syn keyword fortranConstant iso_fortran_env character_storage_size error_unit file_storage_size input_unit iostat_end iostat_eor numeric_storage_size output_unit
2370
454f314d0e61 Make it possible to load Perl dynamically on Unix. (James Vega)
Bram Moolenaar <bram@vim.org>
parents: 2034
diff changeset
277 " IEEE_arithmetic
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
278 syn keyword fortranIntrinsic ieee_arithmetic ieee_support_underflow_control ieee_get_underflow_mode ieee_set_underflow_mode
2370
454f314d0e61 Make it possible to load Perl dynamically on Unix. (James Vega)
Bram Moolenaar <bram@vim.org>
parents: 2034
diff changeset
279
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
280 syn keyword fortranReadWrite flush wait
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
281 syn keyword fortranIO decimal round iomsg
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
282 syn keyword fortranType asynchronous nopass non_overridable pass protected volatile abstract extends import
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
283 syn keyword fortranType non_intrinsic value bind deferred generic final enumerator
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
284 syn match fortranType "\<class\>"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
285 syn match fortranType "\<associate\>"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
286 syn match fortranType "\<end\s*associate"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
287 syn match fortranType "\<enum\s*,\s*bind\s*(\s*c\s*)"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
288 syn match fortranType "\<end\s*enum"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
289 syn match fortranConditional "\<select\s*type"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
290 syn match fortranConditional "\<type\s*is\>"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
291 syn match fortranConditional "\<class\s*is\>"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
292 syn match fortranUnitHeader "\<abstract\s*interface\>"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
293 syn match fortranOperator "\([\|]\)"
2370
454f314d0e61 Make it possible to load Perl dynamically on Unix. (James Vega)
Bram Moolenaar <bram@vim.org>
parents: 2034
diff changeset
294
454f314d0e61 Make it possible to load Perl dynamically on Unix. (James Vega)
Bram Moolenaar <bram@vim.org>
parents: 2034
diff changeset
295 " F2008
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
296 syn keyword fortranIntrinsic acosh asinh atanh bessel_j0 bessel_j1 bessel_jn bessel_y0 bessel_y1 bessel_yn erf erfc erfc_scaled gamma log_gamma hypot norm2
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
297 syn keyword fortranIntrinsic atomic_define atomic_ref execute_command_line leadz trailz storage_size merge_bits
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
298 syn keyword fortranIntrinsic bge bgt ble blt dshiftl dshiftr findloc iall iany iparity image_index lcobound ucobound maskl maskr num_images parity popcnt poppar shifta shiftl shiftr this_image
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
299 syn keyword fortranIO newunit
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
300 syn keyword fortranType contiguous
2370
454f314d0e61 Make it possible to load Perl dynamically on Unix. (James Vega)
Bram Moolenaar <bram@vim.org>
parents: 2034
diff changeset
301 endif
454f314d0e61 Make it possible to load Perl dynamically on Unix. (James Vega)
Bram Moolenaar <bram@vim.org>
parents: 2034
diff changeset
302
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
303 syn cluster fortranCommentGroup contains=fortranTodo
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
304
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
305 if (b:fortran_fixed_source == 1)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
306 if !exists("fortran_have_tabs")
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
307 "Flag items beyond column 72
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
308 syn match fortranSerialNumber excludenl "^.\{73,}$"lc=72
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
309 "Flag left margin errors
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
310 syn match fortranLabelError "^.\{-,4}[^0-9 ]" contains=fortranTab
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
311 syn match fortranLabelError "^.\{4}\d\S"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
312 endif
2034
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 840
diff changeset
313 syn match fortranComment excludenl "^[!c*].*$" contains=@fortranCommentGroup,@spell
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
314 syn match fortranLeftMargin transparent "^ \{5}"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
315 syn match fortranContinueMark display "^.\{5}\S"lc=5
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
316 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
317 syn match fortranContinueMark display "&"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
318 endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
319
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
320 syn match fortranComment excludenl "!.*$" contains=@fortranCommentGroup,@spell
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
321
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
322 "cpp is often used with Fortran
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
323 syn match cPreProc "^\s*#\s*\(define\|ifdef\)\>.*"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
324 syn match cPreProc "^\s*#\s*\(elif\|if\)\>.*"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
325 syn match cPreProc "^\s*#\s*\(ifndef\|undef\)\>.*"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
326 syn match cPreCondit "^\s*#\s*\(else\|endif\)\>.*"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
327 syn region cIncluded contained start=+"[^(]+ skip=+\\\\\|\\"+ end=+"+ contains=fortranLeftMargin,fortranContinueMark,fortranSerialNumber
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
328 syn match cIncluded contained "<[^>]*>"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
329 syn match cInclude "^\s*#\s*include\>\s*["<]" contains=cIncluded
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
330
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
331 "Synchronising limits assume that comment and continuation lines are not mixed
819
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 7
diff changeset
332 if exists("fortran_fold") || exists("fortran_more_precise")
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 7
diff changeset
333 syn sync fromstart
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 7
diff changeset
334 elseif (b:fortran_fixed_source == 0)
2370
454f314d0e61 Make it possible to load Perl dynamically on Unix. (James Vega)
Bram Moolenaar <bram@vim.org>
parents: 2034
diff changeset
335 syn sync linecont "&" minlines=30
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
336 else
2370
454f314d0e61 Make it possible to load Perl dynamically on Unix. (James Vega)
Bram Moolenaar <bram@vim.org>
parents: 2034
diff changeset
337 syn sync minlines=30
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
338 endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
339
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
340 if exists("fortran_fold")
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
341
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
342 if (b:fortran_fixed_source == 1)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
343 syn region fortranProgram transparent fold keepend start="^\s*program\s\+\z(\a\w*\)" skip="^\([!c*]\|\s*#\).*$" excludenl end="\<end\s*\(program\(\s\+\z1\>\)\=\|$\)" contains=ALLBUT,fortranModule
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
344 syn region fortranModule transparent fold keepend start="^\s*module\s\+\(procedure\)\@!\z(\a\w*\)" skip="^\([!c*]\|\s*#\).*$" excludenl end="\<end\s*\(module\(\s\+\z1\>\)\=\|$\)" contains=ALLBUT,fortranProgram
819
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 7
diff changeset
345 syn region fortranFunction transparent fold keepend extend start="^\s*\(elemental \|pure \|recursive \)\=\s*\(\(\(real \|integer \|logical \|complex \|double \s*precision \)\s*\((\(\s*kind\s*=\)\=\s*\w\+\s*)\)\=\)\|type\s\+(\s*\w\+\s*) \|character \((\(\s*len\s*=\)\=\s*\d\+\s*)\|(\(\s*kind\s*=\)\=\s*\w\+\s*)\)\=\)\=\s*function\s\+\z(\a\w*\)" skip="^\([!c*]\|\s*#\).*$" excludenl end="\<end\s*\($\|function\(\s\+\z1\>\)\=\)" contains=ALLBUT,fortranProgram,fortranModule
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
346 syn region fortranSubroutine transparent fold keepend extend start="^\s*\(elemental \|pure \|recursive \)\=\s*subroutine\s\+\z(\a\w*\)" skip="^\([!c*]\|\s*#\).*$" excludenl end="\<end\s*\($\|subroutine\(\s\+\z1\>\)\=\)" contains=ALLBUT,fortranProgram,fortranModule
2370
454f314d0e61 Make it possible to load Perl dynamically on Unix. (James Vega)
Bram Moolenaar <bram@vim.org>
parents: 2034
diff changeset
347 syn region fortranBlockData transparent fold keepend start="\<block\s*data\(\s\+\z(\a\w*\)\)\=" skip="^\([!c*]\|\s*#\).*$" excludenl end="\<end\s*\($\|block\s*data\(\s\+\z1\>\)\=\)" contains=ALLBUT,fortranProgram,fortranModule,fortranSubroutine,fortranFunction,fortran77Loop,fortranCase,fortran90Loop,fortranIfBlock
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
348 syn region fortranInterface transparent fold keepend extend start="^\s*interface\>" skip="^\([!c*]\|\s*#\).*$" excludenl end="\<end\s*interface\>" contains=ALLBUT,fortranProgram,fortranModule,fortran77Loop,fortranCase,fortran90Loop,fortranIfBlock
2370
454f314d0e61 Make it possible to load Perl dynamically on Unix. (James Vega)
Bram Moolenaar <bram@vim.org>
parents: 2034
diff changeset
349 syn region fortranTypeDef transparent fold keepend extend start="^\s*type\s*\(,\s*\(public\|private\)\)\=\s*::" skip="^\([!c*]\|\s*#\).*$" excludenl end="\<end\s*type\>" contains=ALLBUT,fortranProgram,fortranModule,fortran77Loop,fortranCase,fortran90Loop,fortranIfBlock
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
350 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
351 syn region fortranProgram transparent fold keepend start="^\s*program\s\+\z(\a\w*\)" skip="^\s*[!#].*$" excludenl end="\<end\s*\(program\(\s\+\z1\>\)\=\|$\)" contains=ALLBUT,fortranModule
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
352 syn region fortranModule transparent fold keepend start="^\s*module\s\+\(procedure\)\@!\z(\a\w*\)" skip="^\s*[!#].*$" excludenl end="\<end\s*\(module\(\s\+\z1\>\)\=\|$\)" contains=ALLBUT,fortranProgram
819
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 7
diff changeset
353 syn region fortranFunction transparent fold keepend extend start="^\s*\(elemental \|pure \|recursive \)\=\s*\(\(\(real \|integer \|logical \|complex \|double \s*precision \)\s*\((\(\s*kind\s*=\)\=\s*\w\+\s*)\)\=\)\|type\s\+(\s*\w\+\s*) \|character \((\(\s*len\s*=\)\=\s*\d\+\s*)\|(\(\s*kind\s*=\)\=\s*\w\+\s*)\)\=\)\=\s*function\s\+\z(\a\w*\)" skip="^\s*[!#].*$" excludenl end="\<end\s*\($\|function\(\s\+\z1\>\)\=\)" contains=ALLBUT,fortranProgram,fortranModule
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
354 syn region fortranSubroutine transparent fold keepend extend start="^\s*\(elemental \|pure \|recursive \)\=\s*subroutine\s\+\z(\a\w*\)" skip="^\s*[!#].*$" excludenl end="\<end\s*\($\|subroutine\(\s\+\z1\>\)\=\)" contains=ALLBUT,fortranProgram,fortranModule
2370
454f314d0e61 Make it possible to load Perl dynamically on Unix. (James Vega)
Bram Moolenaar <bram@vim.org>
parents: 2034
diff changeset
355 syn region fortranBlockData transparent fold keepend start="\<block\s*data\(\s\+\z(\a\w*\)\)\=" skip="^\s*[!#].*$" excludenl end="\<end\s*\($\|block\s*data\(\s\+\z1\>\)\=\)" contains=ALLBUT,fortranProgram,fortranModule,fortranSubroutine,fortranFunction,fortran77Loop,fortranCase,fortran90Loop,fortranIfBlock
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
356 syn region fortranInterface transparent fold keepend extend start="^\s*interface\>" skip="^\s*[!#].*$" excludenl end="\<end\s*interface\>" contains=ALLBUT,fortranProgram,fortranModule,fortran77Loop,fortranCase,fortran90Loop,fortranIfBlock
2370
454f314d0e61 Make it possible to load Perl dynamically on Unix. (James Vega)
Bram Moolenaar <bram@vim.org>
parents: 2034
diff changeset
357 syn region fortranTypeDef transparent fold keepend extend start="^\s*type\s*\(,\s*\(public\|private\)\)\=\s*::" skip="^\s*[!#].*$" excludenl end="\<end\s*type\>" contains=ALLBUT,fortranProgram,fortranModule,fortran77Loop,fortranCase,fortran90Loop,fortranIfBlock
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
358 endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
359
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
360 if exists("fortran_fold_conditionals")
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
361 if (b:fortran_fixed_source == 1)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
362 syn region fortran77Loop transparent fold keepend start="\<do\s\+\z(\d\+\)" end="^\s*\z1\>" contains=ALLBUT,fortranUnitHeader,fortranStructure,fortranStorageClass,fortranType,fortranProgram,fortranModule,fortranSubroutine,fortranFunction,fortranBlockData
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
363 syn region fortran90Loop transparent fold keepend extend start="\(\<end\s\+\)\@<!\<do\(\s\+\a\|\s*$\)" skip="^\([!c*]\|\s*#\).*$" excludenl end="\<end\s*do\>" contains=ALLBUT,fortranUnitHeader,fortranStructure,fortranStorageClass,fortranType,fortranProgram,fortranModule,fortranSubroutine,fortranFunction,fortranBlockData
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
364 syn region fortranIfBlock transparent fold keepend extend start="\(\<e\(nd\|lse\)\s\+\)\@<!\<if\s*(.\+)\s*then\>" skip="^\([!c*]\|\s*#\).*$" end="\<end\s*if\>" contains=ALLBUT,fortranUnitHeader,fortranStructure,fortranStorageClass,fortranType,fortranProgram,fortranModule,fortranSubroutine,fortranFunction,fortranBlockData
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
365 syn region fortranCase transparent fold keepend extend start="\<select\s*case\>" skip="^\([!c*]\|\s*#\).*$" end="\<end\s*select\>" contains=ALLBUT,fortranUnitHeader,fortranStructure,fortranStorageClass,fortranType,fortranProgram,fortranModule,fortranSubroutine,fortranFunction,fortranBlockData
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
366 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
367 syn region fortran77Loop transparent fold keepend start="\<do\s\+\z(\d\+\)" end="^\s*\z1\>" contains=ALLBUT,fortranUnitHeader,fortranStructure,fortranStorageClass,fortranType,fortranProgram,fortranModule,fortranSubroutine,fortranFunction,fortranBlockData
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
368 syn region fortran90Loop transparent fold keepend extend start="\(\<end\s\+\)\@<!\<do\(\s\+\a\|\s*$\)" skip="^\s*[!#].*$" excludenl end="\<end\s*do\>" contains=ALLBUT,fortranUnitHeader,fortranStructure,fortranStorageClass,fortranType,fortranProgram,fortranModule,fortranSubroutine,fortranFunction,fortranBlockData
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
369 syn region fortranIfBlock transparent fold keepend extend start="\(\<e\(nd\|lse\)\s\+\)\@<!\<if\s*(.\+)\s*then\>" skip="^\s*[!#].*$" end="\<end\s*if\>" contains=ALLBUT,fortranUnitHeader,fortranStructure,fortranStorageClass,fortranType,fortranProgram,fortranModule,fortranSubroutine,fortranFunction,fortranBlockData
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
370 syn region fortranCase transparent fold keepend extend start="\<select\s*case\>" skip="^\s*[!#].*$" end="\<end\s*select\>" contains=ALLBUT,fortranUnitHeader,fortranStructure,fortranStorageClass,fortranType,fortranProgram,fortranModule,fortranSubroutine,fortranFunction,fortranBlockData
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
371 endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
372 endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
373
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
374 if exists("fortran_fold_multilinecomments")
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
375 if (b:fortran_fixed_source == 1)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
376 syn match fortranMultiLineComments transparent fold "\(^[!c*].*\(\n\|\%$\)\)\{4,}" contains=ALLBUT,fortranMultiCommentLines
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
377 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
378 syn match fortranMultiLineComments transparent fold "\(^\s*!.*\(\n\|\%$\)\)\{4,}" contains=ALLBUT,fortranMultiCommentLines
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
379 endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
380 endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
381 endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
382
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
383 " Define the default highlighting.
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
384 " The default highlighting differs for each dialect.
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
385 " Transparent groups:
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
386 " fortranParen, fortranLeftMargin
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
387 " fortranProgram, fortranModule, fortranSubroutine, fortranFunction,
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
388 " fortranBlockData
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
389 " fortran77Loop, fortran90Loop, fortranIfBlock, fortranCase
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
390 " fortranMultiCommentLines
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
391 hi def link fortranKeyword Keyword
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
392 hi def link fortranConstructName Identifier
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
393 hi def link fortranConditional Conditional
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
394 hi def link fortranRepeat Repeat
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
395 hi def link fortranTodo Todo
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
396 hi def link fortranContinueMark Special
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
397 hi def link fortranString String
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
398 hi def link fortranNumber Number
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
399 hi def link fortranOperator Operator
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
400 hi def link fortranBoolean Boolean
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
401 hi def link fortranLabelError Error
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
402 hi def link fortranObsolete Todo
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
403 hi def link fortranType Type
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
404 hi def link fortranStructure Type
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
405 hi def link fortranStorageClass StorageClass
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
406 hi def link fortranCall Function
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
407 hi def link fortranUnitHeader fortranPreCondit
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
408 hi def link fortranReadWrite Keyword
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
409 hi def link fortranIO Keyword
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
410 hi def link fortranIntrinsic Function
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
411 hi def link fortranConstant Constant
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
412
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
413 " To stop deleted & obsolescent features being highlighted as Todo items,
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
414 " comment out the next 5 lines and uncomment the 5 lines after that
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
415 hi def link fortranUnitHeaderOb fortranObsolete
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
416 hi def link fortranKeywordOb fortranObsolete
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
417 hi def link fortranConditionalOb fortranObsolete
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
418 hi def link fortranTypeOb fortranObsolete
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
419 hi def link fortranKeywordDel fortranObsolete
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
420 "hi def link fortranUnitHeaderOb fortranUnitHeader
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
421 "hi def link fortranKeywordOb fortranKeyword
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
422 "hi def link fortranConditionalOb fortranConditional
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
423 "hi def link fortranTypeOb fortranType
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
424 "hi def link fortranKeywordDel fortranKeyword
3256
ba708ee8d69d Updated runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3237
diff changeset
425
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
426 if b:fortran_dialect == "F"
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
427 hi! def link fortranIntrinsicR fortranObsolete
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
428 hi! def link fortranUnitHeaderR fortranObsolete
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
429 hi! def link fortranTypeR fortranObsolete
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
430 hi! def link fortranStorageClassR fortranObsolete
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
431 hi! def link fortranOperatorR fortranObsolete
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
432 hi! def link fortranInclude fortranObsolete
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
433 hi! def link fortranLabelNumber fortranObsolete
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
434 hi! def link fortranTarget fortranObsolete
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
435 hi! def link fortranFloatIll fortranObsolete
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
436 hi! def link fortranIOR fortranObsolete
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
437 hi! def link fortranKeywordR fortranObsolete
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
438 hi! def link fortranStringR fortranObsolete
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
439 hi! def link fortranConditionalR fortranObsolete
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
440 else
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
441 hi! def link fortranIntrinsicR fortranIntrinsic
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
442 hi! def link fortranUnitHeaderR fortranPreCondit
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
443 hi! def link fortranTypeR fortranType
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
444 hi! def link fortranStorageClassR fortranStorageClass
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
445 hi! def link fortranOperatorR fortranOperator
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
446 hi! def link fortranInclude Include
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
447 hi! def link fortranLabelNumber Special
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
448 hi! def link fortranTarget Special
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
449 hi! def link fortranFloatIll fortranFloat
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
450 hi! def link fortranIOR fortranIO
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
451 hi! def link fortranKeywordR fortranKeyword
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
452 hi! def link fortranStringR fortranString
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
453 hi! def link fortranConditionalR fortranConditional
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
454 endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
455
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
456 hi def link fortranFormatSpec Identifier
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
457 hi def link fortranFloat Float
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
458 hi def link fortranPreCondit PreCondit
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
459 hi def link cIncluded fortranString
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
460 hi def link cInclude Include
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
461 hi def link cPreProc PreProc
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
462 hi def link cPreCondit PreCondit
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
463 hi def link fortranParenError Error
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
464 hi def link fortranComment Comment
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
465 hi def link fortranSerialNumber Todo
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
466 hi def link fortranTab Error
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
467
3281
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
468 " Uncomment the next line if you use extra intrinsics provided by vendors
af1e8a1714c2 Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3256
diff changeset
469 "hi def link fortranExtraIntrinsic Function
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
470
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
471 let b:current_syntax = "fortran"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
472
3237
91e53bcb7946 Updated runtime files.
Bram Moolenaar <bram@vim.org>
parents: 2377
diff changeset
473 let &cpo = s:cpo_save
91e53bcb7946 Updated runtime files.
Bram Moolenaar <bram@vim.org>
parents: 2377
diff changeset
474 unlet s:cpo_save
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
475 " vim: ts=8 tw=132