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
PR fortran/30964
[pf3gnuchains/gcc-fork.git]
/
gcc
/
testsuite
/
gfortran.dg
/
nullify_1.f
1
C { dg-do compile }
2
C PR 18993
3
C we didn't match the end of statement following NULLIFY ()
4
C this lead to weird error messages
5
subroutine ordern( )
6
real, pointer :: aux(:,:)
7
C Nullify pointers
8
nullify(aux)
9
C Set default sizes for order N arrays
10
end subroutine ordern
11