[PATCH] Fix PR fortran/6106

[Toon Moene]

Richard Henderson wrote:

> On Wed, Apr 03, 2002 at 05:06:14PM +0200, Jakub Jelinek wrote:
> >       * config/sparc/sparc.h (MIN_UNITS_PER_WORD): Backout 2001-01-01
> >       change.
> 
> Ok.
> 
> Given that this is predicated on IN_LIBGCC2, I can't
> imagine what the original intent was.

But the most spectacular result, of course, is that g77 somehow thinks
it needs to multiply two 16 byte integers to compile this extremely
simple Fortran program:

      subroutine sub(N,u)
      integer N
      double precision u(-N:N,-N:N)
      u(-N,N)=0d0
      return
      end
      program bug
      integer N
      double precision a(-10:10,-10:10)
      data a/441*1d0/
      N=10
      call sub(N,a)
      if (a(-N,N) .ne. 0d0) call abort
      end

I'm sorry, but that's beyond me ...

-- 
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
Join GNU Fortran 95: http://g95.sourceforge.net/ (under construction)