variable is undefined if no echo tag is found

This commit is contained in:
Martin Diehl 2018-06-11 00:42:42 +02:00
parent 04b8218d2c
commit ca24681c49
1 changed files with 2 additions and 1 deletions

View File

@ -163,7 +163,8 @@ subroutine parseFile(sectionNames,part,fileUnit,line)
character(len=65536) :: devNull
character(len=64) :: tag
logical :: echo
echo = .false.
allocate(part(0))
s = 0_pInt