repo.or.cz
/
official-gcc.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
coarray_41.f90: Add "-latomic" option if libatomic_available.
[official-gcc.git]
/
gcc
/
testsuite
/
gfortran.dg
/
proc_ptr_7.c
blob
7e9542fd86e9df39fadf38bbd17598cfc6c55604
1
/* Procedure pointer test. Used by proc_ptr_7.f90.
2
PR fortran/32580. */
3
4
int
f
(
void
) {
5
return
42
;
6
}
7
8
void
assignf_
(
int
(**
ptr
)(
void
)) {
9
*
ptr
=
f
;
10
}