Message ID | f2f66ebf-c8fb-512c-1a1a-85010addf706@codesourcery.com |
---|---|
State | New |
Headers | show |
2017-04-20 Cesar Philippidis <cesar@codesourcery.com> libgomp/ * testsuite/libgomp.oacc-fortran/allocatable-scalar.f90: Clean up test. diff --git a/libgomp/testsuite/libgomp.oacc-fortran/allocatable-scalar.f90 b/libgomp/testsuite/libgomp.oacc-fortran/allocatable-scalar.f90 index 8386c5d..4af42bc 100644 --- a/libgomp/testsuite/libgomp.oacc-fortran/allocatable-scalar.f90 +++ b/libgomp/testsuite/libgomp.oacc-fortran/allocatable-scalar.f90 @@ -1,3 +1,7 @@ +! Test non-declared allocatable scalars in OpenACC data clauses. + +! { dg-do run } + program main implicit none integer, parameter :: n = 100 @@ -19,7 +23,6 @@ program main allocate (c) - print *, loc (c) !$acc parallel copyout(c) num_gangs(1) c = a !$acc end parallel