A testcase provided by Eef van Beveren, notice the difference between the
handling of backslash in the format string and in the regular string:
[EMAIL PROTECTED]:~/src> cat backslash.f
      call wrt('\backslash')
      call wrt('\\backslash')
      write (*,100)
      write (*,200)
      stop
 100  format ('\backslash now results in \backslash')
 200  format ('\\backslash now results in \\backslash')
      end
      subroutine wrt(a)
      character*(*) a
      lena = len(a)
      write(*,*) 'results in: ', a(1:lena)
      return
      end

[EMAIL PROTECTED]:~/src> gfortran backslash.f
[EMAIL PROTECTED]:~/src> ./a.out
 results in:ackslash
 results in: \backslash
\backslash now results in \backslash
\\backslash now results in \\backslash
[EMAIL PROTECTED]:~/src> gfortran -fno-backslash backslash.f
[EMAIL PROTECTED]:~/src> ./a.out
 results in: \backslash
 results in: \\backslash
\backslash now results in \backslash
\\backslash now results in \\backslash
[EMAIL PROTECTED]:~/src> g77 backslash.f
[EMAIL PROTECTED]:~/src> ./a.out
 results in:ackslash
 results in: \backslash
ackslash now results inackslash
\backslash now results in \backslash
[EMAIL PROTECTED]:~/src>


-- 
           Summary: Inconsistencies with backslash handling
           Product: gcc
           Version: 4.3.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: tobi at gcc dot gnu dot org
OtherBugsDependingO 19292
             nThis:


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=30278

Reply via email to