re PR libfortran/26890 (SIZE parameter interacts with same variable in IO list charac...

2006-04-07  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

	PR libgfortran/26890
	* io/io.h: Revert change to pad size made on 2006-03-30.
	Add comment explaining dependency with fortran/trans-io.c.

From-SVN: r112769

diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog
index 280f520af31f7a37613a87d167855ca7ac699630..e486c5a88b5368f32437bd9fa48796c524de5e28 100644 (file)
--- a/libgfortran/ChangeLog
+++ b/libgfortran/ChangeLog
@@ -1,3 +1,9 @@
+2006-04-07  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
+
+       PR libgfortran/26890
+       * io/io.h: Revert change to pad size made on 2006-03-30.
+       Add comment explaining dependency with fortran/trans-io.c.
+       
 2006-04-03  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 
        * io/write.c (output_float): Update condition to not error when

diff --git a/libgfortran/io/io.h b/libgfortran/io/io.h
index b14576c5c0f84446a123526915905737655c4755..b829ad44005e3f62a843a03b084ee6eed3cd5516 100644 (file)
--- a/libgfortran/io/io.h
+++ b/libgfortran/io/io.h
@@ -436,7 +436,9 @@ typedef struct st_parameter_dt
          char value[32];
          gfc_offset size_used;
        } p;
-      char pad[16 * sizeof (char *) + 34 * sizeof (int) - sizeof (gfc_offset)];
+      /* This pad size must be greater than or equal to the pad_size declared in
+        trans-io.c (gfc_build_io_library_fndecls)  */
+      char pad[16 * sizeof (char *) + 34 * sizeof (int)];
     } u;
 }
 st_parameter_dt;