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
2006-10-13 Paul Thomas <pault@gcc.gnu.org>
[pf3gnuchains/gcc-fork.git]
/
gcc
/
testsuite
/
gfortran.dg
/
der_ptr_component_1.f90
1
! { dg-do compile }
2
! PR 19929
3
! Deallocation of pointer components of derived type arrays
4
program der_ptr_component
5
type :: t
6
integer, pointer :: p
7
end type t
8
type(t) :: a(1)
9
10
allocate(a(1)%p)
11
deallocate(a(1)%p)
12
13
end program der_ptr_component