[Bug fortran/33073] New: New ICE that did not occur in 7-30 Windows build

[Bug fortran/33073] New: New ICE that did not occur in 7-30 Windows build

[awgreynolds at earthlink dot net]

subroutine PropagateGrid(wavl,grid,field)
  parameter (KR=8); implicit real(KR) (a-h,o-z)
  intent(in) wavl; intent(inout) grid; dimension grid(0:3,0:3)
  complex(KR),intent(inout) :: field(*)
    call PropagateField(wavl,nint(grid(0,1:)),field) !causes ICE
!    call PropagateField(wavl,int(grid(0,1:)),field) !doesn't
  return
end

C:\gfc\geloe>gfortran -v -c bug.f90
Using built-in specs.
Target: i386-pc-mingw32
Configured with: ../trunk/configure --prefix=/mingw
--enable-languages=c,fortran --with-gmp=/home/FX/local --
Thread model: win32
gcc version 4.3.0 20070813 (experimental)
 c:/program files/gfortran/bin/../libexec/gcc/i386-pc-mingw32/4.3.0/f951.exe
bug.f90 -quiet -dumpbase bug.f90
GNU F95 version 4.3.0 20070813 (experimental) (i386-pc-mingw32)
        compiled by GNU C version 4.3.0 20070813 (experimental), GMP version
4.2.1, MPFR version 2.2.1-p5.
GGC heuristics: --param ggc-min-expand=30 --param ggc-min-heapsize=4096
bug.f90: In function 'propagategrid':
bug.f90:2: internal compiler error: in gfc_add_modify, at fortran/trans.c:159


-- 
           Summary: New ICE that did not occur in 7-30 Windows build
           Product: gcc
           Version: 4.3.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: awgreynolds at earthlink dot net


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

[Bug fortran/33073] New ICE that did not occur in 7-30 Windows build

[fxcoudert at gcc dot gnu dot org]

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #1: Type: text/plain, Size: 1474 bytes --]



------- Comment #1 from fxcoudert at gcc dot gnu dot org  2007-08-14 21:33 -------
Confirmed on x86_64-linux with -m32:

$ cat a.f90 
  real x(1)
  call foo(nint(x))
  end
$ gfortran a.f90 -m32
a.f90: In function ‘MAIN__’:
a.f90:1: internal compiler error: in gfc_add_modify, at fortran/trans.c:159


This comes from a mistake I made when I rewrote the NINT translation. It's easy
to fix and the patch is currently under testing, I expect to commit it later
tonight. Updated binaries will come at the end of the week or the beginning of
next week. (PS: the 2007-07-30 binaries are still available here:
http://quatramaran.ens.fr/~coudert/gfortran/gfortran-windows-20070730.exe)


-- 

fxcoudert at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |fxcoudert at gcc dot gnu dot
                   |                            |org
         AssignedTo|unassigned at gcc dot gnu   |fxcoudert at gcc dot gnu dot
                   |dot org                     |org
             Status|UNCONFIRMED                 |ASSIGNED
     Ever Confirmed|0                           |1
           Keywords|                            |ice-on-valid-code
   Last reconfirmed|0000-00-00 00:00:00         |2007-08-14 21:33:41
               date|                            |


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

[Bug fortran/33073] [4.3 regression] Type mismatch in build_fixbound_expr()

[fxcoudert at gcc dot gnu dot org]

-- 

fxcoudert at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
      Known to fail|                            |4.3.0
      Known to work|                            |4.2.1 4.1.3
            Summary|New ICE that did not occur  |[4.3 regression] Type
                   |in 7-30 Windows build       |mismatch in
                   |                            |build_fixbound_expr()
   Target Milestone|---                         |4.3.0


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

[Bug fortran/33073] [4.3 regression] Type mismatch in build_fixbound_expr()

[fxcoudert at gcc dot gnu dot org]

------- Comment #2 from fxcoudert at gcc dot gnu dot org  2007-08-14 22:40 -------
Subject: Bug 33073

Author: fxcoudert
Date: Tue Aug 14 22:40:00 2007
New Revision: 127494

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=127494
Log:
        PR fortran/33073
        * trans-intrinsic.c (build_fixbound_expr): Convert to result type
        in all cases.

Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/trans-intrinsic.c


-- 


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

[Bug fortran/33073] [4.3 regression] Type mismatch in build_fixbound_expr()

[fxcoudert at gcc dot gnu dot org]

------- Comment #3 from fxcoudert at gcc dot gnu dot org  2007-08-14 22:43 -------
Fixed, thanks for the bug report!


-- 

fxcoudert at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|ASSIGNED                    |RESOLVED
         Resolution|                            |FIXED


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