Re: [Patch, gfortran] Fix PR fortran/12702.

[Toon Moene <toon at moene dot indiv dot nluug dot nl>]

Steven Bosscher wrote:
> Op do 30-10-2003, om 00:39 schreef Toon Moene:
>
> > The attached patch should fix PR fortran/12702.
> >
> > OK if it survives as bootstrap (C and f95 only) and make -k check 
> > (gfortran only) ?
>
> Funny, i was just looking at the same PR.  I'm not sure about the right
> fix.  I'd think that you perhaps want to make "eat_spaces()" eat tabs as
> well.  After all, tabs should be treated as blanks, ie. spaces, and not
> as newlines.

You like this one better (provided it does the job) ?

In that case I'll commit after bootstrap (C and f95) and make -k 
check-gfortran.

Thanks,

--
Toon Moene - mailto:toon@moene.indiv.nluug.nl - phoneto: +31 346 214290
Saturnushof 14, 3738 XG  Maartensdijk, The Netherlands
Maintainer, GNU Fortran 77: http://gcc.gnu.org/onlinedocs/g77_news.html
GNU Fortran 95: http://gcc.gnu.org/fortran/ (under construction)

2003-10-30  Toon Moene  <toon@moene.indiv.nluug.nl>

	PR fortran/12702
	* io/list_read.c (eat_spaces): Treat tab as space.

*** list_read.c.orig	Sun Oct 12 19:02:42 2003
--- list_read.c	Thu Oct 30 19:17:25 2003
*************** eat_spaces (void)
*** 177,183 ****
      {
        c = next_char ();
      }
!   while (c == ' ');
  
    unget_char (c);
    return c;
--- 177,183 ----
      {
        c = next_char ();
      }
!   while (c == ' ' || c == '\t');
  
    unget_char (c);
    return c;