diff options
author | bdavis <bdavis@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-09-21 11:22:47 +0000 |
---|---|---|
committer | bdavis <bdavis@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-09-21 11:22:47 +0000 |
commit | 889dec28d3d43d0a56fae1c248db677b4511fbb2 (patch) | |
tree | 2ab3db1f578dda1d38b09b2e3445fa9d8feafe1f /libgfortran | |
parent | 9e1e92b161ba754552efb08d97af084edf06ce6d (diff) | |
download | gcc-889dec28d3d43d0a56fae1c248db677b4511fbb2.tar.gz |
2004-09-21 Bud Davis <bdavis9659@comcast.net>
PR fortran/17286
* io/list_read.c (namelist_read): ignore spaces after
the '=' for namelist reads.
2004-09-21 Bud Davis <bdavis9659@comcast.net>
PR fortran/17286
* gfortran.dg/pr17286.f90: New test.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@87799 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libgfortran')
-rw-r--r-- | libgfortran/ChangeLog | 6 | ||||
-rw-r--r-- | libgfortran/io/list_read.c | 4 |
2 files changed, 10 insertions, 0 deletions
diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog index a75b1e4b6bf..2908775a827 100644 --- a/libgfortran/ChangeLog +++ b/libgfortran/ChangeLog @@ -1,3 +1,9 @@ +2004-09-21 Bud Davis <bdavis9659@comcast.net> + + PR fortran/17286 + * io/list_read.c (namelist_read): ignore spaces after + the '=' for namelist reads. + 2004-09-15 Aaron W. LaFramboise <aaronavay62@aaronwl.com> * config.h.in: Regenerate. diff --git a/libgfortran/io/list_read.c b/libgfortran/io/list_read.c index 51767d07672..80078a87999 100644 --- a/libgfortran/io/list_read.c +++ b/libgfortran/io/list_read.c @@ -1496,6 +1496,10 @@ restart: len = nl->len; p = nl->mem_pos; + + /* skip any blanks or tabs after the = */ + eat_spaces (); + switch (nl->type) { case BT_INTEGER: |