Summary: | Namelist Comments Problems | ||
---|---|---|---|
Product: | gcc | Reporter: | Matthew Norman <mrnorman> |
Component: | fortran | Assignee: | Jerry DeLisle <jvdelisle2> |
Status: | RESOLVED FIXED | ||
Severity: | normal | CC: | gcc-bugs, mrnorman |
Priority: | P3 | ||
Version: | 4.4.0 | ||
Target Milestone: | --- | ||
Host: | powerpc-apple-darwin9 | Target: | powerpc-apple-darwin9 |
Build: | powerpc-apple-darwin9 | Known to work: | |
Known to fail: | Last reconfirmed: | 2008-06-30 17:56:50 |
Description
Matthew Norman
2008-06-30 15:44:02 UTC
This may have been fixed with a recent patch. I will check and report back this evening. Bug confirmed on trunk. Patch: Index: list_read.c =================================================================== --- list_read.c (revision 137236) +++ list_read.c (working copy) @@ -2922,8 +2922,8 @@ find_nml_name: goto find_nml_name; } - if (c == '!') - eat_line (dtp); + unget_char (dtp, c); + eat_separator (dtp); /* Ready to read namelist objects. If there is an error in input from stdin, output the error message and continue. */ Subject: Bug 36676 Author: jvdelisle Date: Wed Jul 2 03:58:57 2008 New Revision: 137334 URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=137334 Log: 2008-07-01 Jerry DeLisle <jvdelisle@gcc.gnu.org> PR fortran/36676 * io/list_read.c (find_nml_name): Use eat_separator instead of eat_line. Modified: trunk/libgfortran/ChangeLog trunk/libgfortran/io/list_read.c Subject: Bug 36676 Author: jvdelisle Date: Wed Jul 2 04:01:57 2008 New Revision: 137335 URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=137335 Log: 2008-07-01 Jerry DeLisle <jvdelisle@gcc.gnu.org> PR fortran/36676 * gfortran.dg/namelist_51.f90: New test. Added: trunk/gcc/testsuite/gfortran.dg/namelist_51.f90 Modified: trunk/gcc/testsuite/ChangeLog Subject: Bug 36676 Author: jvdelisle Date: Wed Jul 2 04:44:21 2008 New Revision: 137336 URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=137336 Log: 2008-07-01 Jerry DeLisle <jvdelisle@gcc.gnu.org PR fortran/36676 PR fortran/36657 PR fortran/36546 Backport from trunk. * io/list_read.c (find_nml_name): Use unget_char before eat_separator. (read_character): Check for '!' along with separators. (eat_separator): Add tab character to condition for looping past whitespace. Modified: branches/gcc-4_3-branch/libgfortran/ChangeLog branches/gcc-4_3-branch/libgfortran/io/list_read.c Subject: Bug 36676 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 Fixed on trunk and 4.3 |