: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Started to ICE with gfortran-8 before 20180525 :
$ cat z1.f90
program p
type t
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Started to ICE with gfortran-8 before 20180525 :
$ cat z1.f90
program p
character(:), allocatable :: c
contains
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Started to ICE with gfortran-7 :
(derived from a valid z0.f90)
$ cat z0.f90
program p
integer, allocatable :: a
: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Changed between 20181021 and 20181028 :
$ cat z1.f90
program p
print *, findloc(shape(1), 1)
end
$ gfortran-9-20181021 -c z1
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=93835
G. Steinmetz changed:
What|Removed |Added
Keywords||ice-on-valid-code
--- Comment #1 from G.
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=93552
G. Steinmetz changed:
What|Removed |Added
Keywords|ice-on-valid-code |ice-on-invalid-code
--- Comment #6 from G
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=93833
G. Steinmetz changed:
What|Removed |Added
Keywords||ice-on-valid-code
--- Comment #4 from G.
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=88047
--- Comment #5 from G. Steinmetz ---
A related test case, also changed between 20180909 and 20180916 :
$ cat z2.f90
program p
type t
integer :: n
end type
class(t) :: a, x
x = a
end
$ gfortran-9-20180909 -c z2.f90
z2.f90:5:
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Extracted from pr88116. Silently accepts these array
constructors and consequently prints wrong results :
$ cat z1.f90
program p
print *, [integer :: 1, [integer(1) :: '
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=88467
--- Comment #1 from G. Steinmetz ---
Detected, as noted in pr88116 comment 5 :
$ cat z4.f90
program p
print *, [integer :: 1, [integer(4) :: 2, '3']]
end
$ gfortran-9-20181209 -c z4.f90
z4.f90:2:44:
2 |print *, [integer :: 1, [inte
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=88116
--- Comment #6 from G. Steinmetz ---
(In reply to kargl from comment #5)
> I don't know if you like to keep track of issues that you submit or not.
Maybe I could do better. But for the next couple of weeks,
I'm gonna take an absence from Bugzi
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Affects versions down to at least gfortran-5.
Under the hood related to pr85686.
$ cat z1.f90
subroutine s(x)
character(:), allocatable
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=88486
--- Comment #1 from G. Steinmetz ---
Compiles and runs when wrapped in a program :
$ cat z2.f90
program p
character(:), allocatable :: x(:)
x = ['bcd']
x = ['a'//x//'e']
print *, size(x), len(x), x
end
$ gfortran-9-20181209 z2.f
: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Affects versions down to at least gfortran-5 :
$ cat z1.f90
program p
type t
integer :: n = 789
end type
type(t
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=88488
--- Comment #1 from G. Steinmetz ---
Compiles and runs without attribute "parameter" :
$ cat z2.f90
program p
type t
integer :: n = 789
end type
type(t) :: a(2) = t()
type(t) :: b(2)
b = [a]
print *, size(b), b
end
$
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=87992
--- Comment #2 from G. Steinmetz ---
It should be valid code, just as legal as
$ cat z3.f90
subroutine s(x)
class(*), allocatable :: x
allocate (x, source='')
end
$ cat z4.f90
subroutine s(x)
class(*), allocatable :: x
allocate (
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Without a program statement :
$ cat z1.f90
integer(len((c)) :: n
end
$ gfortran-9-20181216 -c z1.f90
$ gfortran-9-20181216 -c z1.f90 -fimplicit
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=88552
--- Comment #1 from G. Steinmetz ---
Detected :
$ cat z2.f90
program p
integer(len((c)) :: n
end
$ cat z5.f90
implicit none
integer(len((c)) :: n
end
$ gfortran-9-20181216 -c z2.f90 -fimplicit-none
z2.f90:2:14:
2 | integer(len((c)) ::
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Changed between 20180708 and 20180722 :
$ cat z1.c
const char a[0][0] = { };
char b[3];
void f (void)
{
__builtin_memcpy (b, a, 2);
}
$ gcc-9-20180708 -c z1.c
$
$ gcc-9-20190120 -c z1
Priority: P3
Component: d
Assignee: ibuclaw at gdcproject dot org
Reporter: gs...@t-online.de
Target Milestone: ---
With option -fsanitize=undefined at -O[23] :
$ cat z1.d
int f (const int[4] x)
{
int sum = 0;
foreach (i; x) sum += i;
return sum;
}
void
Component: d
Assignee: ibuclaw at gdcproject dot org
Reporter: gs...@t-online.de
Target Milestone: ---
With following snippet :
$ cat z1.d
void f(int) {}
void g(...) {}
void h()
{
g(*&f);
}
$ gdc-9-20190120 -c z1.d
$
$ gdc-9-20190120 -c z1.d -O0 -Wextra
during GIMPLE
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=88958
--- Comment #1 from G. Steinmetz ---
$ gdc-9-20190120 -c z1.d -O0
$
$ gdc-9-20190120 -c z1.d -O1
during GIMPLE pass: fre
In function 'h':
d21: internal compiler error: in copy_reference_ops_from_ref, at
tree-ssa-sccvn.c:976
0xce83a5 copy_referen
: normal
Priority: P3
Component: c
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Changed between 20180610 and 20180624, at -O0 on x86_64 GNU/Linux :
$ cat z1.c
void f (void)
{
}
__attribute__((__optimize__("O2&quo
Component: d
Assignee: ibuclaw at gdcproject dot org
Reporter: gs...@t-online.de
Target Milestone: ---
With following test :
$ cat z1.d
struct A
{
int i = A();
};
$ gdc-9-20190120 -c z1.d
d21: internal compiler error: Segmentation fault
0xb821cf crash_signal
../../gcc
Assignee: ibuclaw at gdcproject dot org
Reporter: gs...@t-online.de
Target Milestone: ---
With an invalid qualifier :
$ cat z1.d
class A
{
extern
{
void f() { }
}
}
$ gdc-9-20190120 -c z1.d
z1.d: In function 'f':
z1.d:1:1: internal compiler error: in get_s
Priority: P3
Component: c
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Changed between 20181104 and 2018 :
$ cat z1.c
void f (int n, float *x, float *y)
{
int i;
int g (void)
{
return i;
}
#pragma omp
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=89015
--- Comment #1 from G. Steinmetz ---
Compiles without (unused) function g :
$ cat z2.c
void f (int n, float *x, float *y)
{
int i;
#pragma omp teams distribute parallel for simd
for (i = 0; i < n ; i++)
y[i] = x[i];
}
$ gcc-9-2019012
Priority: P3
Component: d
Assignee: ibuclaw at gdcproject dot org
Reporter: gs...@t-online.de
Target Milestone: ---
With following snippets :
$ cat z1.d
deprecated([]) module m;
$ cat z2.d
deprecated([""]) module m;
$ gdc-9-20190120 -c z1.d
d21: interna
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=89017
--- Comment #1 from G. Steinmetz ---
$ gdc-9-20190120 -c z1.d -g -O2
during GIMPLE pass: fnsplit
In function 'g':
d21: internal compiler error: in dwarf2out_abstract_function, at
dwarf2out.c:22550
0x872772 dwarf2out_abstract_function
../
Assignee: ibuclaw at gdcproject dot org
Reporter: gs...@t-online.de
Target Milestone: ---
With option -g :
$ cat z1.d
auto f(T)()
{
struct A(S)
{
class A
{
void g(){}
}
}
return A!int();
}
void test1()
{
f!int;
}
$ gdc-9-20190120 -c z1.d
$ gdc-9
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=88989
--- Comment #3 from G. Steinmetz ---
> Out of curiosity, are you fuzz testing?
In the case of D, yes.
> I had fixed this before in the D implementation branch.
Oh, thanks.
Commit was from 2018-01-14, i.e. over a year ago.
That makes me wonder,
: d
Assignee: ibuclaw at gdcproject dot org
Reporter: gs...@t-online.de
Target Milestone: ---
This statement gives an ICE :
$ cat z1.d
enum a = delegate {};
$ gdc-9-20190120 -c z1.d
z1.d:1:10: internal compiler error: in get_frame_for_symbol, at
d/d-codegen.cc:2175
1
Assignee: ibuclaw at gdcproject dot org
Reporter: gs...@t-online.de
Target Milestone: ---
Another enum variation :
$ cat z1.d
enum void[] a = void;
$ cat z2.d
enum void[2] a = void;
$ gdc-9-20190120 -c z1.d
z1.d:1:13: internal compiler error: in visit, at d/decl.cc:597
1 | enum void
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
With option -fopenacc, down to at least version 5 :
$ cat z1.f90
real function f()
!$acc update device (f)
end
$ gfortran-9-20190120 -c z1.f90 -fopenacc
during RTL
Priority: P3
Component: c
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Changed before 20180429, gcc-8 compiles it :
$ cat z1.c
void f (int x)
{
void g (int [(int){ x }]);
}
$ gcc-8 -c z1.c
$
$ gcc-9-20190120 -c z1.c
z1.c: In
Priority: P3
Component: c
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Changed between 20180722 and 20180805 :
$ cat z1.c
struct S {
short a, b;
};
struct T {
int c;
struct S s;
};
int f ()
{
struct T t;
t.c
Severity: normal
Priority: P3
Component: c
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Changed between 20190106 and 20190113 on x86_64-pc-linux-gnu :
$ cat z1.c
typedef int v4si __attribute__((vector_size
Priority: P3
Component: c
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Changed before 20180525, gcc-7 compiles it :
$ cat z1.c
void f ();
void f ()
{
void f (struct S);
}
$ gcc-9-20190203 -c z1.c
z1.c: In function
: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Extracted from pr70870, in consequence of pr70870 comment 7.
$ cat z1.f90
program p
type t
integer :: n
end type
type(t), pointer :: z => null()
data z%n
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=70870
G. Steinmetz changed:
What|Removed |Added
CC||gs...@t-online.de
--- Comment #8 from G
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Introduced recently, between 20180325 and 20180422 :
$ cat z1.f90
program p
integer :: x[*]
x[2] = x
end
$ cat z2.f90
subroutine
normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Valid code with evaluated len << 0 (effective char length is zero) :
$ cat z1.f90
program p
character(-h
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=85520
--- Comment #1 from G. Steinmetz ---
Additional test cases :
$ cat z3.f90
program p
character(-huge(1_8)/2_8) :: c(2) = ' '
print *, len(c), size(c), c
end
$ gfortran-8-20180422 -c z3.f90
f951: out of memory allocating 8 bytes after a t
: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Changed between 20180121 and 20180128 :
$ cat z1.f90
program p
character(3) :: c =
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=85521
--- Comment #1 from G. Steinmetz ---
$ cat z2.f90
program p
character(3) :: c = 'abc'
character(3) :: z(1)
z = [ c(:-2) ]
print *, z
end
$ gfortran-8-20180422 -c z2.f90
z2.f90:4:0:
z = [ c(:-2) ]
Warning: '__builtin_memmove'
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
gfortran-8 changed between 20180304 and 20180311.
gfortran-7 changed between 20180215 and 20180308.
gfortran-6 changed between 20180307 and
: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Affects versions down to gfortran-5 :
$ cat z1.f90
program p
procedure(), pointer :: z
contains
real(z()) function f
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Affects versions down to 4.9 at -O[gs123], gfortran-4.8 works :
$ cat z1.f90
program p
integer, parameter :: na = -3, ne = 10
integer
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=85544
--- Comment #1 from G. Steinmetz ---
Whereas this variant (plain b) works for all tested versions :
$ cat z4.f90
program p
integer, parameter :: na = -3, ne = 10
integer :: i, a(na:ne), b(na:ne), c(na:ne)
a = [(i, i=na, ne)]
b = 2*
: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Affects versions 7/8/9, if source contains an unused class variable.
Compiles without that line
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Changed around 20180218, affects versions 8/9 :
$ cat z1.f90
subroutine s(x)
character(*) :: x(:)
associate (y =>
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Feeding F2018 intrinsic function RANK with an illegal argument
(t is not a constant or variable) is silently accepted with -std=f2018,
but gives an ICE with -std=f2008 or
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
With invalid code (s is not a variable) (but compiles with -g) :
$ cat z1.f90
subroutine s
!$acc declare copy(s)
end
$ cat z2.f90
subroutine s
!$acc declare present
: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Affects versions down to gfortran-5 :
$ cat z1.f90
subroutine s
!$acc wait(*)
end
$ gfortran-9-20180506 -c z1.f90 -fopenacc
0xb9e99f crash_signal
../../gcc/toplev.c
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=85703
--- Comment #1 from G. Steinmetz ---
Compiles with result type changed to real or integer, etc.
$ cat z2.f90
real function f()
!$acc parallel loop reduction(+:a)
do i = 1, 4
end do
!$acc end parallel loop
end
Compiles with explici
: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Affects versions down to gfortran-5 :
$ cat z1.f90
character function f()
!$acc parallel loop reduction(+:a)
do i = 1, 4
end do
!$acc end parallel loop
end
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=85703
--- Comment #2 from G. Steinmetz ---
Similar for openmp, e.g.
$ cat za.f90
character function f()
!$omp single
!$omp end single
f = 'a'
end
$ cat zb.f90
function f() result(z)
character :: z
!$omp single
!$omp end single
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
With invalid code, down to at least 4.8 :
$ cat z1.f90
type(t) function f()
type f
end type
end
$ cat z2.f90
type(t) function f() result(z)
type z
end type
end
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=85779
--- Comment #1 from G. Steinmetz ---
Related :
$ cat z3.f90
class(t) function f()
type f
end type
end
$ gfortran-9-20180513 -c z3.f90
f951: internal compiler error: Segmentation fault
0xb9f4bf crash_signal
../../gcc/toplev.c:325
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Affects versions down to at least 4.8 :
$ cat z1.f90
subroutine s(*) bind(c)
end
$ gfortran-9-20180513 -c z1.f90
f951: internal compiler error
: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Affects also versions down to at least 4.8 :
$ cat z1.f90
subroutine s(x) bind(c)
use iso_c_binding, only: c_char
character(kind=c_char), value :: x
print *, x(2:1)
end
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=85781
--- Comment #1 from G. Steinmetz ---
Some variants that are actually compiling :
$ cat z2.f90
subroutine s(x) bind(c)
use iso_c_binding, only: c_char
character(kind=c_char), value :: x
print *, x(1:0)
end
$ cat z3.f90
subroutine s(x
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=72714
G. Steinmetz changed:
What|Removed |Added
CC||gs...@t-online.de
--- Comment #4 from G
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Invalid and supplementary to pr84134, ICEs down to at least 4.8 :
$ cat z1.f90
program p
integer :: i, j, x(2,2)
data ((x(i,j), i=1,2,j-1), j=1,2) /3*789/
end
$ gfortran-9-20180513 -c z1
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
With option -Wsurprising or -Wall, down to at least 4.8 :
$ cat z1.f90
subroutine a
c = transfer(a, b)
end
$ cat z2.f90
subroutine a
c
: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
While wrapped in a type, hits versions down to at least 4.8 :
$ cat z1.f90
program p
type t
integer, allocatable :: a(:)
end type
type(t) :: z
data z%a(1) / 789
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=85798
--- Comment #1 from G. Steinmetz ---
For comparison :
$ cat z2.f90
program p
integer, allocatable :: a(:)
data a(1) / 789 /
end
$ gfortran-9-20180513 -c z2.f90
z2.f90:3:7:
data a(1) / 789 /
1
Error: DATA attribute conflicts
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=85544
--- Comment #3 from G. Steinmetz ---
For special case +-1 :
$ cat zz1.f90
program p
integer, parameter :: na = -3, ne = 10
integer :: i, a(na:ne), b(na:ne)
a = [(i, i=na, ne)]
b = [1**a]
end
$ gfortran-9-20180520 -c zz1.f90 -O2
zz1
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Down to version 4.9, gfortran-4.8 compiles this :
$ cat z1.f90
program p
bind(c) f
x = f()
end
$ gfortran-4.8 -c z1.f90
$
$ gfortran
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Affects versions down to 5 at -O[gs123], with undefined variable "a" :
$ cat z1.f90
program p
real :: a
complex :: c = (2.0, 3.0
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
A release version needs option -g at -O[gs123] :
$ cat z1.f90
program p
integer, pointer :: i
integer, target :: j
j = 2
i
: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Down to version 5, gfortran-4.8/4.9 compiles this :
$ cat z1.f90
program p
character(80) :: c(2)
sync memory (errmsg=c)
end
: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Affects versions down to at least 4.8 :
$ cat z1.f90
program p
integer :: min
print *, min('a','b')
end
$ cat z2.f90
program p
real :: max
print
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=85896
--- Comment #1 from G. Steinmetz ---
This variant should not compile :
$ cat z3.f90
program p
character(:) :: max
print *, max('a','b')
end
$ gfortran-9-20180520 z3.f90 -static-libgfortran
$ a.out
b
It's a regression since about 201
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=85954
--- Comment #1 from G. Steinmetz ---
Assigned directly :
$ cat z2.f90
program p
character(:), allocatable :: z(:)
call s(z)
contains
subroutine s(x)
character(:), allocatable :: x(:)
x = ['abc']
print *, allocated(x)
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=85953
--- Comment #1 from G. Steinmetz ---
Just for completeness, this variant works :
$ cat z2.f90
program p
character(:), allocatable :: x(:)
x = [character :: 'a', 'b']
x = [character :: x, 'c']
print *, x
end
$ gfortran-9-20180527
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Affects versions 6 to 9, gfortran-5 works :
$ cat z1.f90
program p
character(:), allocatable :: x(:)
x = [character :: 'a',
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Derived from gcc/testsuite/gcc.dg/torture/pr85567.c, ICE at -O[s23] :
$ cat z1.c
extern void sincos(double x, double *sinx, double *cosx);
void apply(void (*f)(double, double *, double
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Changed between 20170924 and 20171008, ICE at -O[s123] :
$ cat z1.f90
program p
character(:), allocatable :: z(:)
call s(z)
contains
Priority: P3
Component: c
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Changed between 20180506 and 20180513, ICE at -O[s23].
Derived from gomp/pr85696.c :
$ cat z1.c
void
foo (int n, void *p)
{
int (*a)[n] = (int (*)[n]) p
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Down to at least 4.8 :
$ cat z1.f90
program p
integer, allocatable :: arr(:)
integer :: stat
character(len=128, kind=4) :: errmsg
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=85981
--- Comment #1 from G. Steinmetz ---
Works with character(kind=1) :
$ cat z2.f90
program p
integer, allocatable :: arr(:)
integer :: stat
character(len=128, kind=1) :: errmsg = ' '
allocate (arr(3), stat=stat, errmsg=errmsg)
pri
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Needs option -fdec or -fdec-structure :
$ cat z1.f90
program p
structure /s/
integer :: a
integer, external, pointer :: b
end structure
end
$ gfortran-9
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=85982
--- Comment #1 from G. Steinmetz ---
Comparison sample :
$ cat z2.f90
program p
type t
integer :: a
integer, external, pointer :: b
end type
end
$ gfortran-9-20180527 -c z2.f90
z2.f90:4:23:
integer, external, pointe
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
With incomplete or invalid dummy argument lists :
$ cat z1.f90
module m
type t
contains
procedure :: s1
procedure :: s2
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Affects versions 8/9 at -O[23] (no better example found).
Changed between 20170723 and 20170820.
$ cat z1.c
int fn1 (void);
void __attribute__((naked))
fn2 (void)
{
if (!fn1
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66193
G. Steinmetz changed:
What|Removed |Added
CC||gs...@t-online.de
--- Comment #17 from G
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
This invalid code affects versions down to at least 4.8 :
$ cat z1.f90
program p
logical :: a(2) = (mod([2,3],0) == 0)
integer :: b = count
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=86045
--- Comment #1 from G. Steinmetz ---
In addition some ugly cases with null(), losely related to pr66193.
$ cat zn1.f90
program p
real :: z(1) = [real :: null()] + 2.0
end
$ cat zn2.f90
program p
real :: z(1) = [real :: null()] + [real :
Component: c
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Since end of april, gcc configured with --enable-checking=release
and test case compiled with option -fchecking :
$ cat z1.c
typedef int V __attribute__ ((vector_size(4)));
void
Priority: P3
Component: c
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Introduced between 20180513 and 20180520 :
$ cat z1.c
extern void f (int, int);
void g (int a, int b)
{
int i, j;
for (i = a; i <= b;
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=77703
G. Steinmetz changed:
What|Removed |Added
CC||gs...@t-online.de
--- Comment #4 from G
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=85942
G. Steinmetz changed:
What|Removed |Added
CC||gs...@t-online.de
--- Comment #4 from G
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
Extracted from pr86045 comment 1, loosely related to pr66193.
Invalid code with null(), affects gfortran down to at least 4.8.
$ cat zn1.f90
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=86045
--- Comment #4 from G. Steinmetz ---
> There's a are different issue than the one involving MOD().
Cases from comment 1 are now separated as pr86059.
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=83515
G. Steinmetz changed:
What|Removed |Added
CC||gs...@t-online.de
--- Comment #3 from G
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
With invalid code down to gfortran 5 :
$ cat z1.f90
program p
character(:), allocatable :: x, y
x = 'abc'
y =
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=86110
--- Comment #1 from G. Steinmetz ---
Detected :
$ cat z3.f90
program p
character(:), allocatable :: x, y
x = 'abc'
y = [x]
end
$ gfortran-9-20180610 -c z3.f90
z3.f90:4:3:
y = [x]
1
Error: Incompatible ranks 0 and 1 in assign
: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gs...@t-online.de
Target Milestone: ---
With invalid code, down to at least gfortran 4.8 :
$ cat z1.f90
program p
character(2) :: c = 'a' // [character :: [1]]
end
$ cat z2.f90
program p
real
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=67883
G. Steinmetz changed:
What|Removed |Added
CC||gs...@t-online.de
--- Comment #6 from G
201 - 300 of 746 matches
Mail list logo