[Bug libfortran/33421] New: Weird quotation of namelist output of character arrays.

[Bug libfortran/33421] New: Weird quotation of namelist output of character arrays.

[toon at moene dot indiv dot nluug dot nl]

This program:

      character*20 a(3)
      namelist / nam / a
      read (4, nml=nam)
      write(6, nml=nam)
      end

given the following input (fort.4):

 &nam
 a(1)='aap noot mies wim zus jet',
 a(2)='surf.pressure',
 a(3)='apekool',
 /

produces the following output:

&NAM
 A=aap noot mies wim zu,a(2)='surf.pressure',a(3)='apekool'      ,  /

This mixing of quoted and unquoted strings cannot be correct.  The a(2) and
a(3) are weird.


-- 
           Summary: Weird quotation of namelist output of character arrays.
           Product: gcc
           Version: 4.3.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: libfortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: toon at moene dot indiv dot nluug dot nl


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

[Bug libfortran/33421] [4.3 Regression] Weird quotation of namelist output of character arrays

[burnus at gcc dot gnu dot org]

------- Comment #1 from burnus at gcc dot gnu dot org  2007-09-13 18:40 -------
Another example. With gfortran 4.3.0 it print the following, with NAG f95, g95,
ifort and gfortran 4.2.2 the expected.

b1: " AAP NOOT MIES WIM ZUS JET                   "
b2: "b(2)='SURF.PRESSURE'                         "
b3: "b(3)='APEKOOL'                               "

Expected:
b1: " AAP NOOT MIES WIM ZUS JET                   "
b2: "SURF.PRESSURE                                "
b3: "APEKOOL                                      "


program test
implicit none
character(len=45) :: b(3)
namelist /nam/ b
b = 'x'
open(99)
write(99,'(4(a,/),a)') "&NAM", &
      " b(1)=' AAP NOOT MIES WIM ZUS JET',", &
      " b(2)='SURF.PRESSURE',", &
      " b(3)='APEKOOL',", &
      " /"
rewind(99)
read(99,nml=nam)
close(99,status='delete')

print '(3a)', 'b1: "',b(1),'"'
print '(3a)', 'b2: "',b(2),'"'
print '(3a)', 'b3: "',b(3),'"'

print '(/,"Expected:")'
print '(a)', 'b1: " AAP NOOT MIES WIM ZUS JET                   "'
print '(a)', 'b2: "SURF.PRESSURE                                "'
print '(a)', 'b3: "APEKOOL                                      "'
end program test


-- 

burnus at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |burnus at gcc dot gnu dot
                   |                            |org


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

[Bug libfortran/33421] [4.3 Regression] Weird quotation of namelist output of character arrays

[toon at moene dot indiv dot nluug dot nl]

------- Comment #2 from toon at moene dot indiv dot nluug dot nl  2007-09-13 18:43 -------
*** Bug 33422 has been marked as a duplicate of this bug. ***


-- 


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

[Bug libfortran/33421] [4.3 Regression] Weird quotation of namelist output of character arrays

[toon at moene dot indiv dot nluug dot nl]

------- Comment #3 from toon at moene dot indiv dot nluug dot nl  2007-09-13 18:44 -------
Two witnesses should be enough ...


-- 

toon at moene dot indiv dot nluug dot nl changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |NEW
     Ever Confirmed|0                           |1
   Last reconfirmed|0000-00-00 00:00:00         |2007-09-13 18:44:33
               date|                            |


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

[Bug libfortran/33421] [4.3 Regression] Weird quotation of namelist output of character arrays

[jvdelisle at gcc dot gnu dot org]

------- Comment #4 from jvdelisle at gcc dot gnu dot org  2007-09-20 03:33 -------
I am investigating.


-- 

jvdelisle at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
         AssignedTo|unassigned at gcc dot gnu   |jvdelisle at gcc dot gnu dot
                   |dot org                     |org
             Status|NEW                         |ASSIGNED
   Last reconfirmed|2007-09-13 18:44:33         |2007-09-20 03:33:28
               date|                            |


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

[Bug libfortran/33421] [4.3 Regression] Weird quotation of namelist output of character arrays

[pinskia at gcc dot gnu dot org]

-- 

pinskia at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
   Target Milestone|---                         |4.3.0


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

[Bug libfortran/33421] [4.3 Regression] Weird quotation of namelist output of character arrays

[jvdelisle at gcc dot gnu dot org]

------- Comment #5 from jvdelisle at gcc dot gnu dot org  2007-09-28 02:57 -------
Subject: Bug 33421

Author: jvdelisle
Date: Fri Sep 28 02:57:41 2007
New Revision: 128857

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=128857
Log:
2007-09-27  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

        PR libfortran/33421
        * io/list_read.c (read_character): Revert r128057.

Modified:
    trunk/libgfortran/ChangeLog
    trunk/libgfortran/io/list_read.c


-- 


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

[Bug libfortran/33421] [4.3 Regression] Weird quotation of namelist output of character arrays

[jvdelisle at gcc dot gnu dot org]

------- Comment #6 from jvdelisle at gcc dot gnu dot org  2007-09-28 03:10 -------
I have reverted the offending patch and will reopen pr33253, the least of the
two evils.  This is one of those bugs where the fix for one breaks the other. 
I am still trying to puzzle it out.


-- 

jvdelisle at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|ASSIGNED                    |RESOLVED
         Resolution|                            |FIXED


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