* size_dim.f90: Fix dg directive.

[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gfortran.dg / blockdata_3.f90

diff --git a/gcc/testsuite/gfortran.dg/blockdata_3.f90 b/gcc/testsuite/gfortran.dg/blockdata_3.f90
index 695cbee..8d1a84d 100644 (file)
--- a/gcc/testsuite/gfortran.dg/blockdata_3.f90
+++ b/gcc/testsuite/gfortran.dg/blockdata_3.f90
@@ -1,4 +1,4 @@
-! { dg-compile }
+! { dg-do compile }
 ! { dg-options "-W -Wall" }
 ! Tests the fix for PR29539, in which the derived type in a blockdata
 ! cause an ICE.  With the fix for PR29565, this now compiles and runs