Imported Upstream version 4.8.1
[platform/upstream/gcc48.git] / gcc / testsuite / gfortran.dg / cray_pointers_9.f90
index 81bcb19..cdcd56f 100644 (file)
@@ -101,4 +101,3 @@ program fptr
    p = transfer(fp,p)
    write(*,'(a)') fun([1,2,3])
 end program fptr
-! { dg-final { cleanup-modules "funcs other_fun" } }