OSDN Git Service

2005-12-17 Steven G. Kargl <kargls@comcast.net>
[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gfortran.dg / malloc_free_1.f90
index 4f03ef0..723236f 100644 (file)
@@ -2,7 +2,7 @@
 ! If something is wrong with them, this test might segfault
 ! { dg-do run }
   integer j
-  integer*8 i8
+  integer(kind=8) i8
 
   do j = 1, 10000
     i8 = malloc (10 * j)