48 lines
468 B
Fortran
48 lines
468 B
Fortran
! Enumerate all styles: 0 to 14
|
|
! This is not a viable source file, it just illustrates the different states in isolation.
|
|
|
|
! comment=1
|
|
! Comment
|
|
|
|
! default=0
|
|
! w
|
|
|
|
! number=2
|
|
.37
|
|
|
|
! string1=3
|
|
'string'
|
|
|
|
! string2=4
|
|
"string"
|
|
|
|
! stringeol=5
|
|
" unclosed
|
|
|
|
! operator=6
|
|
+
|
|
|
|
! identifier=7
|
|
variable
|
|
|
|
! word=8
|
|
program
|
|
|
|
! word2=9
|
|
system_clock
|
|
|
|
! word3=10
|
|
doublecomplex
|
|
|
|
! preprocessor=11
|
|
!DEC$ ATTRIBUTES DLLEXPORT::sr1
|
|
|
|
! operator2=12
|
|
.lt.
|
|
|
|
! label=13
|
|
999
|
|
|
|
! continuation=14
|
|
&
|