: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
With a wrong data type for len instead of a scalar-int-expr :
$ cat za2.f90
program p
character(1.) :: c1 = ' '
character(1d1) :: c2
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=67805
--- Comment #2 from Gerhard Steinmetz <gerhard.steinmetz.fort...@t-online.de>
---
And these variants are silently accepted :
$ cat z5.f90
program p
print *, '1: ', [character(.true.) :: 'x', 'y']
print *, '2: ', [character(.false.)
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=67802
--- Comment #1 from Gerhard Steinmetz <gerhard.steinmetz.fort...@t-online.de>
---
Whereas, without initialization relevant errors are detected :
$ cat za1.f90
program p
character(1.) :: c1
character(1d1) :: c2
character((0.,1.))
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=67804
--- Comment #1 from Gerhard Steinmetz <gerhard.steinmetz.fort...@t-online.de>
---
Correct with a scalar string :
$ cat z2.f90
program p
type t
character :: c
end type
type(t) :: x
data x /t('1')/
print *, x
end
$ gf
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=67805
--- Comment #1 from Gerhard Steinmetz <gerhard.steinmetz.fort...@t-online.de>
---
For these variants :
$ cat z4.f90
program p
print *, [character([.true.]) :: 'x', 'y']
print *, [character([.false.]) :: 'x', 'y']
print *, [cha
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
This code :
$ cat z1.f90
program p
type t
character(null()) :: c
end type
type(t) :: x = t('a')
end
yields :
$ gfortran -g -O0 -Wall
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=67803
--- Comment #1 from Gerhard Steinmetz <gerhard.steinmetz.fort...@t-online.de>
---
Whereas :
$ cat z2.f90
program p
character(2) :: x(1)
x = '0' // [character :: '1']
print *, x
end
$ gfortran -g -O0 -Wall -fcheck=all -fno-fr
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
With wrong data in a character array constructor :
$ cat z1.f90
program p
character(2) :: x(1)
x = '0' // [character :: 1]
x = '0
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=67779
Gerhard Steinmetz <gerhard.steinmetz.fort...@t-online.de> changed:
What|Removed |Added
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
This code :
$ cat z1.f90
program p
print *, [character('') :: 'x', 'y']
end
and this variation :
$ cat z2.f90
program p
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=67806
--- Comment #1 from Gerhard Steinmetz <gerhard.steinmetz.fort...@t-online.de>
---
Silently accepted without declaring x :
$ cat z4b.f90
program p
integer, pointer :: n
type t
character(null(n)) :: c
end type
end
$ gfort
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=67614
--- Comment #4 from Gerhard Steinmetz <gerhard.steinmetz.fort...@t-online.de>
---
In general, a future extension to check pointer status
looks promising (at compile time and runtime).
With a tiny and simple source the problem is
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=67614
--- Comment #5 from Gerhard Steinmetz <gerhard.steinmetz.fort...@t-online.de>
---
For comparison, a logical if (assumes scalar-logical-expr
instead of scalar-numeric-expr in arithmetic if) "avoids"
an ICE. Analogous examples
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
An arithmetic if with an array instead of a numeric scalar :
program p
integer :: z(1) = [1]
if ( z ) 1, 2, 3
1
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=67615
--- Comment #1 from Gerhard Steinmetz <gerhard.steinmetz.fort...@t-online.de>
---
With an array constructor :
$ cat z6.f90
program p
if ( [1] ) 1, 2, 3
if ( [1, -1] ) 1, 2, 3
if ( [real :: 1, -1] ) 1, 2, 3
1 stop 1
2 stop 2
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=67614
--- Comment #1 from Gerhard Steinmetz <gerhard.steinmetz.fort...@t-online.de>
---
$ cat z4.f90
program p
integer, pointer :: z => null()
if ( z ) 1, 2, 3
1 stop 1
2 stop 2
3 stop 3
end
$ gfortran -g -O0 -Wall -fcheck=all -fno
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=67616
--- Comment #1 from Gerhard Steinmetz <gerhard.steinmetz.fort...@t-online.de>
---
Compiles without block :
program p
type t
end type
type(t) :: x
data x /t()/
end
Compiles with block and intrinsic type :
program p
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
Some cases with oldstyle arithmetic if in combination with null
instead of a scalar-numeric-expr :
$ cat z1.f90
program p
integer, allocatable :: z
if ( null(z
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
With an embedding block construct :
$ cat z1.f90
program p
type t
end type
block
type(t) :: x
data x /t()/
end block
end
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
This test case with a longer array in initializer of y :
$ cat z1.f90
program p
type t
integer :: n
character(8) :: c(1)
end type
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=67542
--- Comment #1 from Gerhard Steinmetz <gerhard.steinmetz.fort...@t-online.de>
---
The ICE disappears if some prints are added :
$ cat z2.f90
program p
type t
integer :: n
character(8) :: c(1)
end type
type(t) :: x
: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
This construct with an improper association with null ...
subroutine s
associate (x => null())
end associate
end subroutine
or this variat
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
A missing end parenthesis :
program p
character :: c1 = 'abc'(:
character :: c2 = 'abc'(3:
character :: c3 = 'abc'(:1
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=67526
--- Comment #1 from Gerhard Steinmetz <gerhard.steinmetz.fort...@t-online.de>
---
Whereas :
$ cat y1.f90
program p
character(3) :: z = 'abc'
character :: c1 = z(3:
end
$ gfortran y1.f90
y1.f90:3:24:
character :: c1
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=67524
--- Comment #2 from Gerhard Steinmetz <gerhard.steinmetz.fort...@t-online.de>
---
There is no problem when
implicit character(8) (a-z)
is changed to one of
implicit none
implicit integer (a-z)
implicit logical (a-z)
im
: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
This test case with an improper selector ...
real function f(x)
select type (x)
end select
end
or this variation ...
real function f(x
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=67524
--- Comment #1 from Gerhard Steinmetz <gerhard.steinmetz.fort...@t-online.de>
---
Here, all variables are declared explicitly,
but using "implicit character" ...
$ cat z1_imchfe.f90
module m
implicit character(8) (a-z)
cont
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=67525
--- Comment #1 from Gerhard Steinmetz <gerhard.steinmetz.fort...@t-online.de>
---
Whereas :
$ cat y1.f90
subroutine f(x)
select type (x)
end select
end
$ gfortran -c y1.f90
y1.f90:2:18:
select type (x)
1
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66724
--- Comment #1 from Gerhard Steinmetz gerhard.steinmetz.fort...@t-online.de
---
Longer scheme :
backspace (1, iomsg=#)
close (1, iomsg=#)
close (1, status=#)
endfile (1, iomsg=#)
flush (1, iomsg=#)
inquire (1, iomsg=#)
open
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66725
--- Comment #2 from Gerhard Steinmetz gerhard.steinmetz.fort...@t-online.de
---
A more extensive list of different cases :
close (1, status=257)
open (1, access=257)
open (1, action=257)
open (1, asynchronous=257)
open (1, blank
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66725
--- Comment #1 from Gerhard Steinmetz gerhard.steinmetz.fort...@t-online.de
---
Whereas :
$ cat y_test_char_1.f90
program p
print *, char(100)
end
$ gfortran y_test_char_1.f90
$ a.out
d
---
$ cat y_test_char_2.f90
program p
print
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
For most input/output statements and for several specifiers
compilation aborts if assigned specifier key is not changeable
: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
Sometimes a silent conversion from integer to character occurs
where it should not IMO, but should give
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
Formatted read or write of a variable (list) needs a format (fmt)
string longer than 2 characters, because
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66708
Gerhard Steinmetz gerhard.steinmetz.fort...@t-online.de changed:
What|Removed |Added
Severity|normal
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
Specifying a character array for fmt is legal fortran.
If declared as parameter, compilation fails :
$ cat z_wr_fmt_ice_1.f90
program p
character(4
: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
After printing some correct and helpful error messages,
compilation of the following snippets (wrong code) will not end.
Tested with gfortran 5.1.1, 4.9.0, 4.8.3
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66575
--- Comment #3 from Gerhard Steinmetz gerhard.steinmetz.fort...@t-online.de
---
Playing around, I've found other cases (wrong code with procedure)
causing endless compilation on my environment, e.g.
$ cat zlctp_1.f90
program p
procedure(g
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66709
--- Comment #1 from Gerhard Steinmetz gerhard.steinmetz.fort...@t-online.de
---
Whereas versions without parameter compile and run fine :
$ cat z_wr_fmt_ice_4.f90
program p
character(4) :: fmt(1) = '(i8)'
integer :: n
read (*, fmt=fmt
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
For read/write an io-unit that is an asterisk (*) identifies an
external unit that is preconnected for sequential
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66643
--- Comment #1 from Gerhard Steinmetz gerhard.steinmetz.fort...@t-online.de
---
Minimalistic code :
$ cat z_write_none.f90
program p
write (*)
end
$ gfortran -g -O0 -Wall -fcheck=all z_write_none.f90
$ a.out
At line 2 of file
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66056
--- Comment #2 from Gerhard Steinmetz gerhard.steinmetz.fort...@t-online.de
---
Hmm, there is always an ICE on my environment, for any used options.
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66056
--- Comment #3 from Gerhard Steinmetz gerhard.steinmetz.fort...@t-online.de
---
The following test file generates an endless compilation for every
subroutine. It's worth looking deeper.
$ cat type_with_lonely_numbers.f90
program p
call s1
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66056
--- Comment #4 from Gerhard Steinmetz gerhard.steinmetz.fort...@t-online.de
---
These two do not circle around,
$ cat y1.f90
program p
type t
integer :: n = 1
1 !
2 !
end type
type(t) :: a
print *, a
end
$ cat
: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
If the first end interface is missing :
$ cat zlcti_1.f90
module m
interface operator (.f.)
procedure f
!end interface
interface
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66575
--- Comment #1 from Gerhard Steinmetz gerhard.steinmetz.fort...@t-online.de
---
The above sources can be reduced further. The part below contains
(inclusive contains) is not needed to produce the effect :
$ cat zlcti_4.f90
module m
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66244
--- Comment #1 from Gerhard Steinmetz gerhard.steinmetz.fort...@t-online.de
---
Perhaps it's better to make the target array a bit larger.
And to provide a not so minimalistic version :
program p
integer, target :: a(4)
integer
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66544
--- Comment #1 from Gerhard Steinmetz gerhard.steinmetz.fort...@t-online.de
---
Originally not the above z0.f90, but this code was thought as test case :
$ cat z0.f90
module m
contains
function f() result(z)
procedure(f
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66545
--- Comment #2 from Gerhard Steinmetz gerhard.steinmetz.fort...@t-online.de
---
FYI, it's astonishing, but this code compiles without an ICE
and prints some reasonable error messages :
$ cat z2_type.f90
program p
type t
integer :: n
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
This code with implicit none :
module m
implicit none
contains
function f() result(z
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66545
--- Comment #1 from Gerhard Steinmetz gerhard.steinmetz.fort...@t-online.de
---
Trivially, the following cases behave similar :
$ cat z1_real.f90
program p
real, parameter :: c1 = (c1)
real, parameter :: c2 = c2
real :: c3 = (c3
: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
This code uses parameter/variable values before they are defined/initialized.
$ cat z1_complex.f90
program p
complex, parameter :: c1 = (c1
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66493
--- Comment #7 from Gerhard Steinmetz gerhard.steinmetz.fort...@t-online.de
---
Interestingly, there are some tests in the test suite already,
especially altreturn_3.f90 and altreturn_8.f90.
The latter is using a nopass attribute and compiles
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66493
--- Comment #8 from Gerhard Steinmetz gerhard.steinmetz.fort...@t-online.de
---
Case zarc1_2_pass.f90 should be definitely illegal code.
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66193
--- Comment #15 from Gerhard Steinmetz gerhard.steinmetz.fort...@t-online.de
---
Created attachment 35745
-- https://gcc.gnu.org/bugzilla/attachment.cgi?id=35745action=edit
test case pr66193_3_diverse_new.f90
Better test, replaces
: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
This ambiguous code ...
recursive subroutine s
call s
contains
subroutine s
end
end
yields (with gfortran 5.1.1, 4.9.0, 4.8.3
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
This code with an alternate return argument (*) seems to be improper :
module p
type t
contains
procedure
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
Another test case :
integer function f()
contains
integer function f()
end
end
yields (gfortran 5.1.1
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66193
--- Comment #14 from Gerhard Steinmetz gerhard.steinmetz.fort...@t-online.de
---
Attached some prepared test files.
Added more test cases for integer and real.
Added new test case for logical :
subroutine s2
logical(8), parameter :: z1(2
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66193
--- Comment #13 from Gerhard Steinmetz gerhard.steinmetz.fort...@t-online.de
---
Created attachment 35728
-- https://gcc.gnu.org/bugzilla/attachment.cgi?id=35728action=edit
test case pr66193_3_diverse.f90
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66193
--- Comment #12 from Gerhard Steinmetz gerhard.steinmetz.fort...@t-online.de
---
Created attachment 35727
-- https://gcc.gnu.org/bugzilla/attachment.cgi?id=35727action=edit
test case pr66193_2_integer.f90
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66193
--- Comment #11 from Gerhard Steinmetz gerhard.steinmetz.fort...@t-online.de
---
Created attachment 35726
-- https://gcc.gnu.org/bugzilla/attachment.cgi?id=35726action=edit
test case pr66193_1_real.f90
: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
A missing end program in a fixed source s.f :
program p
integer x(2)
x = 0
if ( x(1) 0 .or.
x(2) 0 ) print *, x
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
This code with less array elements than requested via shape sh :
program p
integer, parameter :: sh(2) = [2
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66310
--- Comment #3 from Gerhard Steinmetz gerhard.steinmetz.fort...@t-online.de
---
I do agree, that some extra temporary data is necessary and there
should be a practical (high) limit for something like that.
Let the helper buffers be five or ten
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
This small program compiles without any message (gfortran 5.1.1, 4.9.0, 4.8.3)
program p
character :: z = 'z
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66311
--- Comment #1 from Gerhard Steinmetz gerhard.steinmetz.fort...@t-online.de
---
Of course, some computations are wrong, too.
For example :
program p
integer(8), parameter :: z = huge(1_8)
print *, 2_16 * z
print *, 2 * int
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
First of all, it's great to support integer(16).
But printing some numbers from range 2^63 to 2^64-1 with this snippet :
program p
print
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
This test case with an empty type selector (type is) ...
program p
type t; end type
class(t), allocatable :: x
call s
contains
subroutine
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
This code snippet ...
program p
integer, target :: a(3)
integer, pointer :: z = a(3)
z = 0
print *, z
end
yields (with gfortran 5.1.1 on SUSE
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66193
--- Comment #10 from Gerhard Steinmetz gerhard.steinmetz.fort...@t-online.de
---
Perhaps it's better to make one factor larger.
Maybe the following will help.
$ cat zz1.f90
program p
real :: z(2)
z = 10 + [real :: 1, 2
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
This initialisation of an array (NOT zero sized, NOT a parameter)
program p
real :: z(2)
z = 1 + [real :: 1, 2]
end
yields
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66193
--- Comment #1 from Gerhard Steinmetz gerhard.steinmetz.fort...@t-online.de
---
For integer instead of real ...
program p
integer :: z(2)
z = 1.2 + [integer :: 3.5, 4.5]
print *, z
end
it compiles with gfortran
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66193
--- Comment #3 from Gerhard Steinmetz gerhard.steinmetz.fort...@t-online.de
---
Hmm, no observable difference with option -fno-frontend-optimize, sorry.
Of course I probed some combinations for several options.
One example for a more extensive
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
This simplified code snippet with a zero sized array parameter z ...
program p
integer, parameter :: z(0) = 0
print
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66128
--- Comment #1 from Gerhard Steinmetz gerhard.steinmetz.fort...@t-online.de
---
Some more examples with other error messages.
This one ...
program p
integer, parameter :: z(0) = 0
print *, count(z 0)
end
yields :
internal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
This code snippet with a missing parameter value for n ...
program p
character(*), parameter :: z(2) = [character(n
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
This code snippet with an incomplete interface operator block ...
program p
interface operator ( .gt. )
end
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
---
code snippet 1 :
program p
print *, storage_size([null()])
end
f951: internal compiler error: Invalid expression in gfc_element_size
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
Some code snippets :
---
entry e; end
---
subroutine p
end
entry e
end
---
program p
type t
contains
entry e
end type
end
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
This incorrect code snippet disrupts :
program p
contains
integer :: null=null()
end
f951: internal compiler error: Segmentation fault
Tested
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
This code fragment with interchanged lines
module p
contains
protected x
end
produces (with gfortran 5.1.1 on SUSE Linux 13.2, 64 bit)
f951
: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
This code fragment with a lonely label in a type ...
program p
type t
1 !
end type
end
or this variation ...
program p
type t
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
This code fragment with an incomplete generic statement ...
program p
type t
contains
generic
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
An ICE occurs with a misplaced sequence in a function.
$ cat disrupt_2_sequence.f90
real function f(x)
sequence
end
$ gfortran -c disrupt_2_sequence.f90
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66040
--- Comment #1 from Gerhard Steinmetz gerhard.steinmetz.fort...@t-online.de
---
There are more cases for ICEs on misplaced statements in a function. For
example :
---
real function f()
block data
end
---
real function f
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: gerhard.steinmetz.fort...@t-online.de
Target Milestone: ---
Created attachment 35483
-- https://gcc.gnu.org/bugzilla/attachment.cgi?id=35483action=edit
more code variants
501 - 588 of 588 matches
Mail list logo
