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
2011-08-18 Tobias Burnus <burnus@net-b.de>
[pf3gnuchains/gcc-fork.git]
/
gcc
/
testsuite
/
gfortran.dg
/
access_spec_1.f90
1
! { dg-do compile }
2
! PR fortran/31472
3
! Access specifications: Valid Fortran 2003 code
4
module mod
5
implicit none
6
private
7
integer, public :: i
8
integer, private :: z
9
integer :: j, x
10
private :: j
11
public :: x
12
type, public :: bar
13
PRIVATE
14
integer, public :: y ! Fortran 2003
15
integer, private :: z ! Fortran 2003
16
end type
17
end module
18
! { dg-final { cleanup-modules "mod" } }