public inbox for gcc-bugs@sourceware.org
help / color / mirror / Atom feed
* [Bug fortran/18372] New: internal compiler error: in gfc_conv_descriptor_dtype, at fortran/trans-array.c:216
@ 2004-11-08  9:50 sgg at ipp dot mpg dot de
  2004-11-08 12:45 ` [Bug fortran/18372] " pinskia at gcc dot gnu dot org
                   ` (2 more replies)
  0 siblings, 3 replies; 4+ messages in thread
From: sgg at ipp dot mpg dot de @ 2004-11-08  9:50 UTC (permalink / raw)
  To: gcc-bugs

I will report  TWO bugs

#gcc -v
Reading specs from /usr/lib/gcc-lib/i486-suse-linux/3.3/specs
Configured with: ../configure --enable-threads=posix --prefix=/usr
--with-local-prefix=/usr/local --infodir=/usr/share/info --mandir=/usr/share/man
--libdir=/usr/lib --enable-languages=c,c++,f77,objc,java,ada --disable-checking
--enable-libgcj --with-gxx-include-dir=/usr/include/g++ --with-slibdir=/lib
--with-system-zlib --enable-shared --enable-__cxa_atexit i486-suse-linux
Thread model: posix
gcc version 3.3 20030226 (prerelease) (SuSE Linux)

#Compiler

gfortran -c -v -O4   /afs/ipp/u/sgg/code/utils/src/string_vec.f90
Reading specs from
/afs/ipp-garching.mpg.de/u/sgg/gfortran/irun/bin/../lib/gcc/i686-pc-linux-gnu/4.0.0/specs
Configured with: ../gcc/configure --enable-languages=c,f95
--prefix=/usr/work/2004309/irun
Thread model: posix
gcc version 4.0.0 20041104 (experimental)

BUG #1

/afs/ipp-garching.mpg.de/u/sgg/gfortran/irun/bin/../libexec/gcc/i686-pc-linux-gnu/4.0.0/f951
/afs/ipp/u/sgg/code/utils/src/string_vec.f90 -quiet -dumpbase string_vec.f90
-mtune=pentiumpro -auxbase string_vec -O4 -version -o /tmp/ccHXhH3d.s
GNU F95 version 4.0.0 20041104 (experimental) (i686-pc-linux-gnu)
        compiled by GNU C version 4.0.0 20041020 (experimental).
GGC heuristics: --param ggc-min-expand=30 --param ggc-min-heapsize=4096
/afs/ipp/u/sgg/code/utils/src/string_vec.f90: In function 'set_2_str_with_v':
/afs/ipp/u/sgg/code/utils/src/string_vec.f90:11: internal compiler error: in
gfc_conv_descriptor_dtype, at fortran/trans-array.c:216
Please submit a full bug report,
with preprocessed source if appropriate.
See <URL:http://gcc.gnu.org/bugs.html> for instructions.

#Source:
!! Some of the strings ar in the Char-vector form
!! In those cases you may use size() istead of len()

module string_vec

implicit none

!private

  interface set_2_str
    module procedure set_2_str_with_str,&
                     set_2_str_with_v
  end interface set_2_str

contains

!--------- set_2_str ----------------------------

! allocate a string vector and copy string in it
! 

 
  subroutine set_2_str_with_str(str_p,str)

    character(len=*), intent(in) ::str      ! string in
    character(1), pointer:: str_p(:)        ! char_vector

    integer :: i

!  allocate
! ---------
    allocate (str_p(len_trim(str)))
    
!  copy string to vector
!-----------------------


    do i=1, size(str_p)
      str_p(i)=str(i:i)
    enddo

  end subroutine set_2_str_with_str

  subroutine set_2_str_with_v(str_p,str)

    character(1), intent(in) :: str(:)      ! char_vector in
    character(1), pointer    :: str_p(:)    ! char_vector out

    integer :: i

!  allocate
! ---------
    allocate (str_p(size(str)))

!  copy string to vector
!-----------------------

    do i=1, size(str_p)
      str_p(i)=str(i)
    enddo

  end subroutine set_2_str_with_v

end module string_vec

BUG #2
gfortran -c -O4 -v ./pvm_configure_gf_bug.f90
Reading specs from
/afs/ipp-garching.mpg.de/u/sgg/gfortran/irun/bin/../lib/gcc/i686-pc-linux-gnu/4.0.0/specs
Configured with: ../gcc/configure --enable-languages=c,f95
--prefix=/usr/work/2004309/irun
Thread model: posix
gcc version 4.0.0 20041104 (experimental)

/afs/ipp-garching.mpg.de/u/sgg/gfortran/irun/bin/../libexec/gcc/i686-pc-linux-gnu/4.0.0/f951
./pvm_configure_gf_bug.f90 -quiet -dumpbase pvm_configure_gf_bug.f90
-mtune=pentiumpro -auxbase pvm_configure_gf_bug -O4 -version -o /tmp/ccWLu7WX.s
GNU F95 version 4.0.0 20041104 (experimental) (i686-pc-linux-gnu)
        compiled by GNU C version 4.0.0 20041020 (experimental).
GGC heuristics: --param ggc-min-expand=30 --param ggc-min-heapsize=4096
./pvm_configure_gf_bug.f90: In function 'pvm_next_cpu':
./pvm_configure_gf_bug.f90:37: internal compiler error: Segmentation fault
Please submit a full bug report,
with preprocessed source if appropriate.
module pvm_configure
implicit none
integer, parameter :: PVM_STRING=12
private
  type :: pvm_conf
    integer                   :: nhosts=0             !! anzahl der Hosts
    type (arch_type),pointer  :: arch(:)
  end type pvm_conf

  type arch_type
    character(len=PVM_STRING) :: host_name=''       !! ASCII TCP/IP-NAME
  endtype arch_type

  type(pvm_conf), save   :: config

  public  pvm_next_cpu

contains
!----------------------- pvm_next_cpu ----------------------------------

  subroutine pvm_next_cpu (host_id)

    integer, intent (out) :: host_id

    integer :: priority
    integer :: i

    host_id=0
    priority = 0
    config%nhosts=1
    allocate(config%arch(config%nhosts))
  end subroutine pvm_next_cpu
end module pvm_configure


Hopping you have all informations you need

Best regards

Silvio Gori

-- 
           Summary: internal compiler error: in gfc_conv_descriptor_dtype,
                    at fortran/trans-array.c:216
           Product: gcc
           Version: 3.0.3
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: sgg at ipp dot mpg dot de
                CC: gcc-bugs at gcc dot gnu dot org


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


^ permalink raw reply	[flat|nested] 4+ messages in thread
* [Bug fortran/18372] internal compiler error: in gfc_conv_descriptor_dtype, at fortran/trans-array.c:216
  2004-11-08  9:50 [Bug fortran/18372] New: internal compiler error: in gfc_conv_descriptor_dtype, at fortran/trans-array.c:216 sgg at ipp dot mpg dot de
@ 2004-11-08 12:45 ` pinskia at gcc dot gnu dot org
  2004-11-08 13:20 ` reichelt at gcc dot gnu dot org
  2004-11-08 13:30 ` reichelt at gcc dot gnu dot org
  2 siblings, 0 replies; 4+ messages in thread
From: pinskia at gcc dot gnu dot org @ 2004-11-08 12:45 UTC (permalink / raw)
  To: gcc-bugs



-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
            Version|3.0.3                       |4.0.0


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


^ permalink raw reply	[flat|nested] 4+ messages in thread
* [Bug fortran/18372] internal compiler error: in gfc_conv_descriptor_dtype, at fortran/trans-array.c:216
  2004-11-08  9:50 [Bug fortran/18372] New: internal compiler error: in gfc_conv_descriptor_dtype, at fortran/trans-array.c:216 sgg at ipp dot mpg dot de
  2004-11-08 12:45 ` [Bug fortran/18372] " pinskia at gcc dot gnu dot org
@ 2004-11-08 13:20 ` reichelt at gcc dot gnu dot org
  2004-11-08 13:30 ` reichelt at gcc dot gnu dot org
  2 siblings, 0 replies; 4+ messages in thread
From: reichelt at gcc dot gnu dot org @ 2004-11-08 13:20 UTC (permalink / raw)
  To: gcc-bugs


------- Additional Comments From reichelt at gcc dot gnu dot org  2004-11-08 13:18 -------
The first problem can be reduced to

========================================
subroutine FOO(P)
    character, pointer :: P(:)
    allocate (P(1))
end subroutine
========================================

which is a duplicate of PR17202.


-- 


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


^ permalink raw reply	[flat|nested] 4+ messages in thread
* [Bug fortran/18372] internal compiler error: in gfc_conv_descriptor_dtype, at fortran/trans-array.c:216
  2004-11-08  9:50 [Bug fortran/18372] New: internal compiler error: in gfc_conv_descriptor_dtype, at fortran/trans-array.c:216 sgg at ipp dot mpg dot de
  2004-11-08 12:45 ` [Bug fortran/18372] " pinskia at gcc dot gnu dot org
  2004-11-08 13:20 ` reichelt at gcc dot gnu dot org
@ 2004-11-08 13:30 ` reichelt at gcc dot gnu dot org
  2 siblings, 0 replies; 4+ messages in thread
From: reichelt at gcc dot gnu dot org @ 2004-11-08 13:30 UTC (permalink / raw)
  To: gcc-bugs


------- Additional Comments From reichelt at gcc dot gnu dot org  2004-11-08 13:30 -------
The second bug is a duplicate of PR 17584.

Please open seperate bug reports for each bug next time.
This makes it easier to keep track of the bugs.


*** This bug has been marked as a duplicate of 17584 ***

-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |RESOLVED
         Resolution|                            |DUPLICATE


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


^ permalink raw reply	[flat|nested] 4+ messages in thread
end of thread, other threads:[~2004-11-08 13:30 UTC | newest]

Thread overview: 4+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2004-11-08  9:50 [Bug fortran/18372] New: internal compiler error: in gfc_conv_descriptor_dtype, at fortran/trans-array.c:216 sgg at ipp dot mpg dot de
2004-11-08 12:45 ` [Bug fortran/18372] " pinskia at gcc dot gnu dot org
2004-11-08 13:20 ` reichelt at gcc dot gnu dot org
2004-11-08 13:30 ` reichelt at gcc dot gnu dot org

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).