Fortran: handle carriage return in non terminated strings (Origin: bugzilla #680408)

[doxygen]

status VERIFIED severity normal in component general for ---
Reported in version 1.8.1.2-SVN on platform Other
Assigned to: Dimitri van Heesch

Original attachment names and IDs:

• bug_680408.patch (ID 219443)

On 2012-07-22 18:47:42 +0000, albert wrote:

Compilers accept non terminated strings which are continued at the next line(especially with fixed format). result is that the string is concatenated. When looking at the strings in the outputted code, these strings are concatenated instead of split over the different lines.

Example:

  SUBROUTINE strange_txt
    CHARACTER(LEN=150) :: full_txt
    DATA full_txt
 1/'tst1
 1  txt2
 1  txt3'
 1  /
    WRITE(*,*) full_txt
  END SUBROUTINE

The resulting output is:

1 SUBROUTINE strange_txt
2 CHARACTER(LEN=150) :: full_txt
3 DATA full_txt
4 1/
5
6 'tst1 1 txt2 1 txt3'
7 1 /
8 WRITE(,) full_txt
9 END SUBROUTINE

instead of:

1 SUBROUTINE strange_txt
2 CHARACTER(LEN=150) :: full_txt
3 DATA full_txt
4 1/'tst1
5 1 txt2
6 1 txt3'
7 1 /
8 WRITE(,) full_txt
9 END SUBROUTINE

On 2012-07-22 18:50:32 +0000, albert wrote:

Created attachment 219443
PATCH allow new line / carriage return character in string

In case of a new line in a character string the string is printed correctly in the code.

On 2012-07-28 19:17:35 +0000, Dimitri van Heesch wrote:

Thanks, I'll include the patch in the next subversion update.

On 2012-08-11 13:18:15 +0000, Dimitri van Heesch wrote:

This bug was previously marked ASSIGNED, which means it should be fixed in
doxygen version 1.8.2. Please verify if this is indeed the case. Reopen the
bug if you think it is not fixed and please include any additional information
that you think can be relevant.

On 2012-08-12 12:30:15 +0000, albert wrote:

Works as described