OSDN Git Service
(root)
/
pf3gnuchains
/
gcc-fork.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
* config/i386/i386.md (UNSPEC_VSIBADDR): New.
[pf3gnuchains/gcc-fork.git]
/
gcc
/
testsuite
/
gfortran.dg
/
proc_decl_25.f90
1
! { dg-do compile }
2
!
3
! PR 47352: [F03] ICE with proc-pointers in generic procedures
4
!
5
! Contributed by James van Buskirk
6
! cf. http://groups.google.com/group/comp.lang.fortran/browse_thread/thread/bbaf59ffd7c372e9
7
8
implicit none
9
10
abstract interface
11
real function f()
12
end function f
13
end interface
14
15
procedure(f) :: f1
16
17
interface gen
18
procedure f1
19
end interface gen
20
21
write(*,*) gen()
22
end