Sign in
llvm
/
llvm-archive
/
3698204cb8af2c80b326ae84c9a9e6a4bccbdedc
/
.
/
llvm-gcc-4.2
/
gcc
/
testsuite
/
gfortran.dg
/
gomp
/
free-1.f90
blob: f6f9de4441bc6b8bf22a7a087b13648ae0927e38 [
file
] [
log
] [
blame
]
!
{
dg
-
require
-
effective
-
target tls
}
subroutine foo
integer
,
save
::
i
!
Some
comment
!
$omp threadpri
&
!
$omp
&
vate
(
i
)
i
=
1
end
subroutine