invalid_name.f90 | searchcode

/Test/invalid_name.f90

http://github.com/fishman/ctags
FORTRAN Modern | 12 lines | 11 code | 0 blank | 1 comment | 0 complexity | 81c0b1ece04c313f0cfaff65e8f46356 MD5 | raw file
Possible License(s): GPL-2.0

 1! Test of parsing type with invalid name
 2      Module TR_DetectionRecording
 3      Implicit None
 4      Save
 5      Integer :: DR_Lun
 6      Character*1024  DR_Filename
 7      Type Detection_Record
 8         Integer(2) :: Activity
 9         Integer(2) :: Type           ! "Type" not valid entity name
10         Integer(2) :: Face
11      End Type Detection_Record
12      End Module TR_DetectionRecording