dtio_17.f90: Fix test.

2016-10-19  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

	* gfortran.dg/dtio_17.f90: Fix test.

From-SVN: r241352

gcc/testsuite/ChangeLog

+2016-10-19  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
+
+	* gfortran.dg/dtio_17.f90: Fix test.
+
 2016-10-19  Aldy Hernandez  <aldyh@redhat.com>
 
 	* gcc.dg/Walloca-1.c: Adjust test for !lp64 targets.

gcc/testsuite/gfortran.dg/dtio_17.f90

@@ -61,6 +61,10 @@ PROGRAM test
   TYPE (person) :: chairman
   integer(4) :: rl, tl, kl, thesize
 
+  rl = 1
+  tl = 22
+  kl = 333
+  thesize = 9999
   chairman%name="Charlie"
   chairman%age=62