diff options
author | Janne Blomqvist <jb@gcc.gnu.org> | 2009-04-10 10:23:25 +0300 |
---|---|---|
committer | Janne Blomqvist <jb@gcc.gnu.org> | 2009-04-10 10:23:25 +0300 |
commit | 6b6802109eeaa57a3f0c13e24dd2c4d0e05bc06c (patch) | |
tree | 8509c804d12904a38df4e5c47b9757db6a474c6d /libgfortran/io/io.h | |
parent | 8b7a6bb2faf84c3d620222c7aff68a87f9f82104 (diff) | |
download | gcc-6b6802109eeaa57a3f0c13e24dd2c4d0e05bc06c.zip gcc-6b6802109eeaa57a3f0c13e24dd2c4d0e05bc06c.tar.gz gcc-6b6802109eeaa57a3f0c13e24dd2c4d0e05bc06c.tar.bz2 |
PR libfortran/39665 libfortran/39702 libfortran/39709
2009-04-10 Janne Blomqvist <jb@gcc.gnu.org>
PR libfortran/39665 libfortran/39702 libfortran/39709
* io/io.h (st_parameter_dt): Revert aligned attribute from u.p.value.
* io/list_read.c (read_complex): Read directly into user pointer.
(read_real): Likewise.
(list_formatted_read_scalar): Update read_complex and read_real calls.
(nml_read_obj): Read directly into user pointer.
From-SVN: r145875
Diffstat (limited to 'libgfortran/io/io.h')
-rw-r--r-- | libgfortran/io/io.h | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/libgfortran/io/io.h b/libgfortran/io/io.h index 5ee0979..7e4742e 100644 --- a/libgfortran/io/io.h +++ b/libgfortran/io/io.h @@ -500,9 +500,8 @@ typedef struct st_parameter_dt int expanded_read; /* Storage area for values except for strings. Must be large enough to hold a complex value (two reals) of the - largest kind. It must also be sufficiently aligned for - assigning any type we use into it. */ - char value[32] __attribute__ ((aligned (__BIGGEST_ALIGNMENT__))); + largest kind. */ + char value[32]; GFC_IO_INT size_used; } p; /* This pad size must be equal to the pad_size declared in |