[Bug libfortran/36538] New: namelist failure with tabs preceding object name

[Bug libfortran/36538] New: namelist failure with tabs preceding object name

[jvdelisle at gcc dot gnu dot org]

The following testcase illustrates the issue.

Reported here:

http://gcc.gnu.org/ml/fortran/2008-06/msg00149.html

      program check1
      real x
      namelist/casein/x
      read(1,casein)
      print*,x
      end

fort.1 contains:

&CASEIN 
                x=1.
/

Two tabs precede x.


-- 
           Summary: namelist failure with tabs preceding object name
           Product: gcc
           Version: 4.4.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: libfortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: jvdelisle at gcc dot gnu dot org


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

[Bug libfortran/36538] namelist failure with tabs preceding object name

[jvdelisle at gcc dot gnu dot org]

------- Comment #1 from jvdelisle at gcc dot gnu dot org  2008-06-14 03:28 -------
I will work this.


-- 

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|UNCONFIRMED                 |ASSIGNED
     Ever Confirmed|0                           |1
   Last reconfirmed|0000-00-00 00:00:00         |2008-06-14 03:28:27
               date|                            |


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

[Bug libfortran/36538] namelist failure with tabs preceding object name

[jvdelisle at gcc dot gnu dot org]

------- Comment #2 from jvdelisle at gcc dot gnu dot org  2008-06-14 03:53 -------
The following patch fixes this:

Index: list_read.c
===================================================================
--- list_read.c (revision 136763)
+++ list_read.c (working copy)
@@ -2922,6 +2922,8 @@ find_nml_name:
       goto find_nml_name;
     }

+  eat_separator (dtp);
+
   /* Ready to read namelist objects.  If there is an error in input
      from stdin, output the error message and continue.  */

I will commit as obvious after completing regression tests.  Passes al namelist
tests we have.


-- 


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

[Bug libfortran/36538] namelist failure with tabs preceding object name

[jvdelisle at gcc dot gnu dot org]

------- Comment #3 from jvdelisle at gcc dot gnu dot org  2008-06-14 04:31 -------
Subject: Bug 36538

Author: jvdelisle
Date: Sat Jun 14 04:30:48 2008
New Revision: 136776

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=136776
Log:
2008-06-13  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

        PR fortran/36538
        * io/list_read.c (namelist_read): Add eat_separator to eliminate
leading
        tabs.

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


-- 


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

[Bug libfortran/36538] namelist failure with tabs preceding object name

[jvdelisle at gcc dot gnu dot org]

------- Comment #4 from jvdelisle at gcc dot gnu dot org  2008-06-14 04:39 -------
Subject: Bug 36538

Author: jvdelisle
Date: Sat Jun 14 04:39:11 2008
New Revision: 136777

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=136777
Log:
2008-06-14  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

        PR fortran/36538
        * gfortran.dg: namelist_48.f90: New test.

Added:
    trunk/gcc/testsuite/gfortran.dg/namelist_48.f90
Modified:
    trunk/gcc/testsuite/ChangeLog


-- 


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

[Bug libfortran/36538] namelist failure with tabs preceding object name

[jvdelisle at gcc dot gnu dot org]

------- Comment #5 from jvdelisle at gcc dot gnu dot org  2008-06-14 04:40 -------
That was quick.


-- 

jvdelisle at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|ASSIGNED                    |RESOLVED
         Resolution|                            |FIXED
   Target Milestone|---                         |4.4.0


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

[Bug libfortran/36538] namelist failure with tabs preceding object name

[aldot at gcc dot gnu dot org]

------- Comment #6 from aldot at gcc dot gnu dot org  2008-06-14 12:23 -------
Jerry, does the 4.3 branch also need this fix?


-- 


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

[Bug libfortran/36538] namelist failure with tabs preceding object name

[jvdelisle at gcc dot gnu dot org]

------- Comment #7 from jvdelisle at gcc dot gnu dot org  2008-06-14 13:52 -------
yes, we could think of it as a regression relative to g77


-- 


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

[Bug libfortran/36538] namelist failure with tabs preceding object name

[jvdelisle at gcc dot gnu dot org]

------- Comment #8 from jvdelisle at gcc dot gnu dot org  2008-06-14 17:58 -------
Subject: Bug 36538

Author: jvdelisle
Date: Sat Jun 14 17:57:55 2008
New Revision: 136784

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=136784
Log:
2008-06-14  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

        PR fortran/36538
        Backport from trunk.
        * io/list_read.c (namelist_read): Add eat_separator to
        eliminate leading tabs.

Modified:
    branches/gcc-4_3-branch/libgfortran/ChangeLog
    branches/gcc-4_3-branch/libgfortran/io/list_read.c


-- 


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

[Bug libfortran/36538] namelist failure with tabs preceding object name

[jvdelisle at gcc dot gnu dot org]

------- Comment #9 from jvdelisle at gcc dot gnu dot org  2008-07-02 04:53 -------
Subject: Bug 36538

Author: jvdelisle
Date: Wed Jul  2 04:52:47 2008
New Revision: 137337

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=137337
Log:
2008-07-01  Jerry DeLisle  <jvdelisle@gcc.gnu.org

        PR fortran/36676
        PR fortran/36657
        PR fortran/36546
        PR fortran/36538
        * gfortran.dg/namelist_50.f90
        * gfortran.dg/namelist_51.f90
        * gfortran.dg/namelist_48.f90
        * gfortran.dg/namelist_49.f90

Added:
    branches/gcc-4_3-branch/gcc/testsuite/gfortran.dg/namelist_48.f90
    branches/gcc-4_3-branch/gcc/testsuite/gfortran.dg/namelist_49.f90
    branches/gcc-4_3-branch/gcc/testsuite/gfortran.dg/namelist_50.f90
    branches/gcc-4_3-branch/gcc/testsuite/gfortran.dg/namelist_51.f90
Modified:
    branches/gcc-4_3-branch/gcc/testsuite/ChangeLog


-- 


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