[Bug libfortran/60701] internal compiler error: in gfc_conv_variable, at fortran/trans-expr.c:551

2014-03-28 Thread peter.machon at arcor dot de 
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=60701

--- Comment #2 from Peter Machon  ---

(In reply to Dominique d'Humieres from comment #1)
> The test succeeds with 4.6 to trunk, but ICE (in gfc_build_null_descriptor)
> with 4.5. Could you post the output of gfortran -v?

Sure:

Using built-in specs.
COLLECT_GCC=gfortran
COLLECT_LTO_WRAPPER=/Users/pm/gcc_build_4.5/libexec/gcc/x86_64-apple-darwin10.7.0/4.5.2/lto-wrapper
Target: x86_64-apple-darwin10.7.0
Configured with: ./configure --prefix=/Users/pm/gcc_build_4.5/
--enable-cloog-backend=isl --enable-languages=c,c++,fortran,objc
Thread model: posix
gcc version 4.5.2 (GCC)

[Bug libfortran/60701] New: internal compiler error: in gfc_conv_variable, at fortran/trans-expr.c:551

2014-03-28 Thread peter.machon at arcor dot de 
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=60701

Bug ID: 60701
   Summary: internal compiler error: in gfc_conv_variable, at
fortran/trans-expr.c:551
   Product: gcc
   Version: 4.5.2
Status: UNCONFIRMED
  Severity: normal
  Priority: P3
 Component: libfortran
  Assignee: unassigned at gcc dot gnu.org
  Reporter: peter.machon at arcor dot de

Created attachment 32478
  --> http://gcc.gnu.org/bugzilla/attachment.cgi?id=32478&action=edit
called by main program  just some matrix definitions.

The attached code produces the following error code:

test.f90: In function 'test':
test.f90:84:0: internal compiler error: in gfc_conv_variable, at
fortran/trans-expr.c:551
Please submit a full bug report,
with preprocessed source if appropriate.
See <http://gcc.gnu.org/bugs.html> for instructions.

If gf in the function g(x,e) is not an array but a scalar, it's compiling and
running without an issue.

System: Mac OSX 10.6.8 

Best, Peter

PS.: I saw a similar report (43896). So I'm sorry, in case, the issue is
already solved in a never version of gfortran.

Source:

module test_mod
implicit none

type terminal
   character(len=1) :: typ
   real(8) :: d
   contains
   procedure,pass :: g
end type

type(terminal),dimension(1:2) :: t

contains

function g(x,e) result(gf)
use pauli
class(terminal),intent(inout) :: x
real(8),intent(in) :: e
complex(8),dimension(1:2,1:2) :: gf
select case (x%typ)
   case('N')
   gf=sigma_3
   case('S')
   gf=e*sigma_3+x%d*sigma_1
end select
end function

end module

program test
use test_mod
implicit none

t(1)%typ='N'
t(2)%typ='S'
t(2)%d=3d0

write(*,*)t(1)%g(2d0)
write(*,*)t(2)%g(2d0)
end program

[Bug libfortran/60701] internal compiler error: in gfc_conv_variable, at fortran/trans-expr.c:551

2014-03-28 Thread peter.machon at arcor dot de 
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=60701

--- Comment #4 from Peter Machon  ---
(In reply to Dominique d'Humieres from comment #3)
> > gcc version 4.5.2 (GCC)
> 
> 4.5 and 4.6 are no longer supported. You should upgrade to 4.8.2: pr43896
> has been fixed by r158910, Apr 29 2010 (BTW where did you get your
> gfortran?).
> 
> *** This bug has been marked as a duplicate of bug 43896 ***

Yes thanks a lot. Upgrading is probably the best solution. 
I don't entirely get your question. I think I downloaded the source from your
web-page and just compiled it. But that's already some years ago.

[Bug libfortran/60701] internal compiler error: in gfc_conv_variable, at fortran/trans-expr.c:551

2014-03-28 Thread peter.machon at arcor dot de 
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=60701

--- Comment #5 from Peter Machon  ---
Addendum: With version 4.8.2 it works just fine, thanks a lot!

[Bug fortran/61251] New: Hang in write from inside a function

2014-05-20 Thread peter.machon at arcor dot de 
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=61251

Bug ID: 61251
   Summary: Hang in write from inside a function
   Product: gcc
   Version: 4.8.2
Status: UNCONFIRMED
  Severity: normal
  Priority: P3
 Component: fortran
  Assignee: unassigned at gcc dot gnu.org
  Reporter: peter.machon at arcor dot de

Writing from a functions stops execution of programs.

**

Simple code:

program test

write(*,*) f(3e0)

contains

function f(x)
real :: f,x
write(*,*)x
f=2e0*x
end function

end program

*

The write function inside the function f(x) causes the hang. Sorry if it is
supposed to be like this. But with e.g. the PGI compiler it works fine. 
I'm working with MacOSX 10.6.8 and a self-build gcc, downloaded from the gnu
page.


gfortran -v :

Using built-in specs.
COLLECT_GCC=gfortran
COLLECT_LTO_WRAPPER=/Users/pm/bin/gcc_4.8.2/libexec/gcc/x86_64-apple-darwin10.8.0/4.8.2/lto-wrapper
Target: x86_64-apple-darwin10.8.0
Configured with: ./configure --prefix=/Users/pm/bin/gcc_4.8.2/
Thread model: posix
gcc version 4.8.2 (GCC)