diff options
| author | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2006-04-07 23:05:12 +0000 |
|---|---|---|
| committer | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2006-04-07 23:05:12 +0000 |
| commit | 967d4d456cfdb5a2fc816e3104672efee931800e (patch) | |
| tree | 40511739cedbd3ba2641ac67815d2e6e57bae7e6 | |
| parent | 8e7a2b58e7c1b6427511249ec77c38f064342262 (diff) | |
| download | gcc-967d4d456cfdb5a2fc816e3104672efee931800e.zip gcc-967d4d456cfdb5a2fc816e3104672efee931800e.tar.gz gcc-967d4d456cfdb5a2fc816e3104672efee931800e.tar.bz2 | |
re PR libfortran/26890 (SIZE parameter interacts with same variable in IO list character length specification.)
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
| -rw-r--r-- | libgfortran/ChangeLog | 6 | ||||
| -rw-r--r-- | libgfortran/io/io.h | 4 |
2 files changed, 9 insertions, 1 deletions
diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog index 280f520..e486c5a 100644 --- 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 b14576c..b829ad4 100644 --- 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; |