Skip to content

Commit 63dca82

Browse files
authored
Merge pull request #1284 from fortran-lang/fix/syntax-highlighting-fixed-comments
fix/syntax highlighting fixed comments
2 parents a1a72ef + 9bbf6e7 commit 63dca82

8 files changed

Lines changed: 129 additions & 183 deletions

CHANGELOG.md

Lines changed: 2 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -80,6 +80,8 @@ and this project adheres to [Semantic Versioning](http://semver.org/).
8080

8181
### Fixed
8282

83+
- Fixed inconsistent syntax highlighting of comments in Fixed Form
84+
([#923](https://github.com/fortran-lang/vscode-fortran-support/issues/923))
8385
- Fixed various bugs with syntax highlighting and `FORMAT` statements
8486
([#1130](https://github.com/fortran-lang/vscode-fortran-support/issues/1130))
8587
- Fixed bug with `fypp` and Windows where preprocessor paths were not properly

package.json

Lines changed: 7 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -158,6 +158,13 @@
158158
"language": "FortranFixedForm",
159159
"scopeName": "source.fortran.fixed",
160160
"path": "./syntaxes/fortran_fixed-form.tmLanguage.json"
161+
},
162+
{
163+
"scopeName": "comment.line.fixed.injection",
164+
"path": "./syntaxes/fortran_fixed-form-comments.injection.json",
165+
"injectTo": [
166+
"source.fortran.fixed"
167+
]
161168
}
162169
],
163170
"snippets": [
Lines changed: 10 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,10 @@
1+
{
2+
"scopeName": "comment.line.fixed.injection",
3+
"injectionSelector": "L:source.fortran.fixed",
4+
"patterns": [
5+
{
6+
"match": "^[cC*].*$\\n?",
7+
"name": "comment.line.fortran"
8+
}
9+
]
10+
}

test/fortran/syntax/auxilary_functions.f.snap

Lines changed: 54 additions & 108 deletions
Large diffs are not rendered by default.

test/fortran/syntax/fixed_form.F.snap

Lines changed: 2 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -1,9 +1,7 @@
11
>* euclid.f (FORTRAN 77)
2-
#^ source.fortran.fixed comment.line.fortran
3-
# ^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed comment.line.fortran
2+
#^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed comment.line.fortran
43
>* Find greatest common divisor using the Euclidean algorithm
5-
#^ source.fortran.fixed comment.line.fortran
6-
# ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed comment.line.fortran
4+
#^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed comment.line.fortran
75
>
86
> PROGRAM EUCLID
97
#^^^^^^ source.fortran.fixed constant.numeric.fortran
Lines changed: 5 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -1,4 +1,5 @@
1-
call foo(a,
2-
& b,
3-
c I don't like this comment
4-
& d)
1+
program hello
2+
print*, sign(1,
3+
c I don't like this comment
4+
& -5)
5+
end program hello
Lines changed: 27 additions & 23 deletions
Original file line numberDiff line numberDiff line change
@@ -1,24 +1,28 @@
1-
> call foo(a,
1+
> program hello
22
#^^^^^^ source.fortran.fixed constant.numeric.fortran
3-
# ^^^^ source.fortran.fixed meta.statement.control.call.fortran keyword.control.call.fortran
4-
# ^ source.fortran.fixed meta.statement.control.call.fortran
5-
# ^^^ source.fortran.fixed meta.statement.control.call.fortran entity.name.function.subroutine.fortran
6-
# ^ source.fortran.fixed meta.statement.control.call.fortran punctuation.parentheses.left.fortran
7-
# ^ source.fortran.fixed meta.statement.control.call.fortran meta.parameter.fortran
8-
# ^^ source.fortran.fixed meta.statement.control.call.fortran
9-
> & b,
10-
#^^^^^^ source.fortran.fixed meta.statement.control.call.fortran constant.numeric.fortran
11-
# ^^ source.fortran.fixed meta.statement.control.call.fortran
12-
# ^ source.fortran.fixed meta.statement.control.call.fortran meta.parameter.fortran
13-
# ^^ source.fortran.fixed meta.statement.control.call.fortran
14-
> c I don't like this comment
15-
#^^^^^^ source.fortran.fixed meta.statement.control.call.fortran constant.numeric.fortran
16-
# ^ source.fortran.fixed meta.statement.control.call.fortran meta.parameter.fortran
17-
# ^ source.fortran.fixed meta.statement.control.call.fortran
18-
# ^ source.fortran.fixed meta.statement.control.call.fortran meta.parameter.fortran
19-
# ^ source.fortran.fixed meta.statement.control.call.fortran
20-
# ^^^ source.fortran.fixed meta.statement.control.call.fortran meta.parameter.fortran
21-
# ^ source.fortran.fixed meta.statement.control.call.fortran string.quoted.single.fortran punctuation.definition.string.begin.fortran
22-
# ^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.statement.control.call.fortran string.quoted.single.fortran
23-
> & d)
24-
#^^^^^^^^^^^^^^^^ source.fortran.fixed meta.statement.control.call.fortran string.quoted.single.fortran
3+
# ^^^^^^^ source.fortran.fixed meta.program.fortran keyword.control.program.fortran
4+
# ^ source.fortran.fixed meta.program.fortran
5+
# ^^^^^ source.fortran.fixed meta.program.fortran entity.name.program.fortran
6+
> print*, sign(1,
7+
#^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran constant.numeric.fortran
8+
# ^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran
9+
# ^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran keyword.control.print.fortran
10+
# ^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran keyword.operator.power.fortran
11+
# ^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran
12+
# ^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran support.function.intrinsic.fortran
13+
# ^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran punctuation.parentheses.left.fortran
14+
# ^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran constant.numeric.fortran
15+
# ^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran
16+
>c I don't like this comment
17+
#^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
18+
> & -5)
19+
#^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran keyword.line-continuation-operator.fortran
20+
# ^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran
21+
# ^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran constant.numeric.fortran
22+
# ^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran punctuation.parentheses.right.fortran
23+
> end program hello
24+
#^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran constant.numeric.fortran
25+
# ^^^^^^^^^^^ source.fortran.fixed meta.program.fortran keyword.control.endprogram.fortran
26+
# ^ source.fortran.fixed meta.program.fortran
27+
# ^^^^^ source.fortran.fixed meta.program.fortran entity.name.program.fortran
28+
>

test/fortran/syntax/implicit_array_fixed.f.snap

Lines changed: 22 additions & 44 deletions
Original file line numberDiff line numberDiff line change
@@ -1,12 +1,9 @@
11
>C This file demonstrates the syntax of "implicit arrays" (Implied-DO)
2-
#^ source.fortran.fixed comment.line.fortran
3-
# ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed comment.line.fortran
2+
#^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed comment.line.fortran
43
>C in Fixed Form Fortran.
5-
#^ source.fortran.fixed comment.line.fortran
6-
# ^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed comment.line.fortran
4+
#^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed comment.line.fortran
75
>C Covers: DATA statements, I/O lists, and Array Constructors.
8-
#^ source.fortran.fixed comment.line.fortran
9-
# ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed comment.line.fortran
6+
#^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed comment.line.fortran
107
>
118
> program implicit_arrays_fixed
129
#^^^^^^ source.fortran.fixed constant.numeric.fortran
@@ -55,14 +52,11 @@
5552
# ^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran meta.specification.type.fortran meta.name-list.fortran meta.parameter.fortran punctuation.parentheses.right.fortran
5653
>
5754
>C ==========================================
58-
#^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
59-
# ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
55+
#^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
6056
>C 1. DATA Statements (Implied-DO)
61-
#^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
62-
# ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
57+
#^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
6358
>C ==========================================
64-
#^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
65-
# ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
59+
#^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
6660
>
6761
> data (a(i), i=1, 5) /1, 2, 3, 4, 5/
6862
#^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran constant.numeric.fortran
@@ -94,8 +88,7 @@
9488
# ^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran
9589
>
9690
>C Continuation in DATA implied-do
97-
#^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
98-
# ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
91+
#^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
9992
> data (a(i),
10093
#^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran constant.numeric.fortran
10194
# ^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran keyword.control.data.fortran
@@ -129,14 +122,11 @@
129122
# ^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran
130123
>
131124
>C ==========================================
132-
#^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
133-
# ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
125+
#^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
134126
>C 2. I/O Lists
135-
#^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
136-
# ^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
127+
#^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
137128
>C ==========================================
138-
#^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
139-
# ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
129+
#^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
140130
>
141131
> print *, (a(i), i=1, 10)
142132
#^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran constant.numeric.fortran
@@ -159,8 +149,7 @@
159149
# ^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran punctuation.parentheses.right.fortran
160150
>
161151
>C Nested implied-do in I/O
162-
#^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
163-
# ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
152+
#^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
164153
> write(*,*) ((b(i,j), i=1, 3), j=1, 3)
165154
#^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran constant.numeric.fortran
166155
# ^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran meta.statement.IO.fortran keyword.control.write.fortran
@@ -194,8 +183,7 @@
194183
# ^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran meta.statement.IO.fortran punctuation.parentheses.right.fortran
195184
>
196185
>C Complex continuation in I/O list
197-
#^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
198-
# ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
186+
#^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
199187
> print *, (a(i),
200188
#^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran constant.numeric.fortran
201189
# ^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran keyword.control.print.fortran
@@ -255,8 +243,7 @@
255243
# ^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran meta.statement.IO.fortran punctuation.parentheses.right.fortran
256244
>
257245
>C With expressions in bounds
258-
#^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
259-
# ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
246+
#^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran meta.statement.IO.fortran comment.line.fortran
260247
> print *, (a(i), i=1, 2*5)
261248
#^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran constant.numeric.fortran
262249
# ^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran keyword.control.print.fortran
@@ -280,18 +267,14 @@
280267
# ^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran punctuation.parentheses.right.fortran
281268
>
282269
>C ==========================================
283-
#^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
284-
# ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
270+
#^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
285271
>C 3. Array Constructors (Supported in F90 fixed form)
286-
#^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
287-
# ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
272+
#^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
288273
>C ==========================================
289-
#^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
290-
# ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
274+
#^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
291275
>
292276
>C Old style (/ /)
293-
#^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
294-
# ^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
277+
#^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
295278
> a = (/ (i, i=1, 10) /)
296279
#^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran constant.numeric.fortran
297280
# ^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran meta.parameter.fortran
@@ -313,8 +296,7 @@
313296
# ^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran meta.contructor.array punctuation.bracket.left.fortran
314297
>
315298
>C Split across lines
316-
#^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
317-
# ^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
299+
#^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
318300
> a = (/ (i,
319301
#^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran constant.numeric.fortran
320302
# ^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran meta.parameter.fortran
@@ -339,8 +321,7 @@
339321
# ^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran meta.contructor.array punctuation.bracket.left.fortran
340322
>
341323
>C Nested
342-
#^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
343-
# ^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
324+
#^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
344325
> a = (/ ((i+j, i=1, 2), j=1, 2), 0, 0, 0, 0, 0, 0 /)
345326
#^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran constant.numeric.fortran
346327
# ^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran meta.parameter.fortran
@@ -384,14 +365,11 @@
384365
# ^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran meta.contructor.array punctuation.bracket.left.fortran
385366
>
386367
>C ==========================================
387-
#^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
388-
# ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
368+
#^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
389369
>C 4. Whitespace stress test
390-
#^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
391-
# ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
370+
#^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
392371
>C ==========================================
393-
#^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
394-
# ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
372+
#^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran comment.line.fortran
395373
>
396374
> a = (/ ( i , i = 1 , 10 ) /)
397375
#^^^^^^ source.fortran.fixed meta.program.fortran meta.block.specification.program.fortran constant.numeric.fortran

0 commit comments

Comments
 (0)