re PR fortran/46794 (ICE on valid code involving power of small integer kinds)

2010-12-05  Daniel Kraft  <d@domob.eu>

	PR fortran/46794
	* gfortran.dg/power2.f90: Initialize variables.

From-SVN: r167471

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index ab9f955de307c032f720e93521b43ed715d1f3f8..875a86db3e0ec530329a8d0b933f5b6716858081 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2010-12-05  Daniel Kraft  <d@domob.eu>
+
+       PR fortran/46794
+       * gfortran.dg/power2.f90: Initialize variables.
+
 2010-12-04  Jan Hubicka  <jh@suse.cz>
 
        * snprintf-chk.c (ptr): Declare volatile.

diff --git a/gcc/testsuite/gfortran.dg/power2.f90 b/gcc/testsuite/gfortran.dg/power2.f90
index 01954cb6832ec4cfd4b3e190a14773e4238d8e33..5e2cf0440fc9eccde944f18b92fbec51ce08349c 100644 (file)
--- a/gcc/testsuite/gfortran.dg/power2.f90
+++ b/gcc/testsuite/gfortran.dg/power2.f90
@@ -13,6 +13,9 @@ PROGRAM main
   INTEGER(KIND=1) :: k1
   INTEGER(KIND=2) :: k2
 
+  k1 = 1_1
+  k2 = 1_2
+
   k1 = 1_1 + 1_1**k1
   k2 = 1_2 + 1_2**k2