Skip to content

R
riscv-gcc-1
Commit c6e75626 by François-Xavier Coudert
Options

re PR libfortran/31286 (cshift uses uninitialized variables) 

	PR libfortran/31286
	PR libfortran/31296

	* intrinsics/cshift0.c (cshift0): Initialize sstride[0] and rstride[0].
	* intrinsics/unpack_generic.c (unpack0, unpack0_char): Zero the
	array structures we pass to unpack_internal.

From-SVN: r123944
parent 8cf81ddf
Showing with 107 additions and 95 deletions
libgfortran/ChangeLog
2007-04-18 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
PR libfortran/31286
PR libfortran/31296
* intrinsics/cshift0.c (cshift0): Initialize sstride[0] and rstride[0].
* intrinsics/unpack_generic.c (unpack0, unpack0_char): Zero the
array structures we pass to unpack_internal.
2007-04-14 Jerry DeLisle <jvdelisle@gcc.gnu.org>
* io/open.c (test_endfile): Revert changes for 31052, restoring this
......@@ -10,7 +18,7 @@
2007-04-11 Kai Tietz <kai.tietz@onevision.com>
* configure: Regenerate.
* configure: Regenerate.
2007-04-06 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
......@@ -201,7 +209,7 @@
2007-04-06 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/31395
PR libfortran/31395
* io/format.c (parse_format_list): Fix parsing.
2007-04-03 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
......@@ -211,7 +219,7 @@
2007-04-01 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/31052
PR libfortran/31052
* io/open.c (test_endfile): Delete this function.
(edit_modes): Delete call to test_endfile.
(new_unit): Likewise.
......@@ -221,13 +229,13 @@
2007-04-01 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/31366
PR libfortran/31366
* io/transfer.c (read_block_direct): Do not generate error when reading
past EOF on a short record that is less than the RECL= specified.
2007-04-01 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/31207
PR libfortran/31207
* io/unit.c (close_unit_1): If there are bytes previously written from
ADVANCE="no", move to the end before closing.
......@@ -243,13 +251,13 @@
2007-03-27 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/31052
PR libfortran/31052
* io/transfer.c (next_record_r): Do not call test_endfile if in namelist
mode.
2007-03-25 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/31199
PR libfortran/31199
* io/io.h: Add saved_pos to gfc_unit structure.
* io/open.c (new_unit): Initialize saved_pos.
* io/transfer.c (data_transfer_init): Set max_pos to value in saved_pos.
......@@ -265,7 +273,7 @@
2007-03-22 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/31052
PR libfortran/31052
* file_pos.c: Update Copyright year.
* io/open.c (test_endfile): Restore test_endfile to fix SPEC regression.
Update Copyright year.
......@@ -283,7 +291,7 @@
2007-03-18 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/31052
PR libfortran/31052
* io/file_position (st_rewind): Fix comments. Remove use of
test_endfile. Don't seek if already at 0 position. Use new is_special
function to set endfile state.
......@@ -299,7 +307,7 @@
2007-03-15 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/31099
PR libfortran/31099
* io/file_pos.c (st_rewind): Don't set bytes_left to zero.
2007-03-15 Francois-Xavier Coudert <coudert@clipper.ens.fr>
......@@ -323,7 +331,7 @@
2007-03-14 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/31051
PR libfortran/31051
* io/transfer.c (formatted_transfer_scalar): Adjust position for pending
spaces when in writing mode. Clean up some formatting.
......@@ -359,7 +367,7 @@
2007-03-09 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/31099
PR libfortran/31099
* io/open.c (new_unit): Initialize bytes_left and recl_subrecord.
* io/transfer.c (next_record_w): Set bytes left to record length for
sequential unformatted I/O.
......@@ -423,12 +431,12 @@
2007-02-24 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/30918
PR libfortran/30918
* io/listread.c (namelist_read): Eat comment line.
2007-02-22 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/30910
PR libfortran/30910
* io/write.c (output_float): Add condition of format F only for
special case rounding with zero precision.
......@@ -753,7 +761,7 @@
2007-01-17 Tom Tromey <tromey@redhat.com>
PR libgfortran/27107:
PR libfortran/27107:
* aclocal.m4, configure, Makefile.in: Rebuilt.
* configure.ac: Enable automake dependency tracking. Update
minimum automake version.
......@@ -789,14 +797,14 @@
2007-01-12 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/30435
PR libfortran/30435
* io/list_read.c (finish_separator): Don't call next_record.
(list_formatted_read_scalar): Clean up some comments and whitespace.
(nml_read_obj): Whitespace fix.
2007-01-05 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/30162
PR libfortran/30162
* io/unix.c (fd_flush): Don't seek if file is not seekable, defined as
s->file_length == -1.
(fd_alloc_w_at): Do not adjust file_length if file is not seekable.
......
libgfortran/ChangeLog-2004
......@@ -590,7 +590,7 @@
2004-08-05 Victor Leikehman <lei@il.ibm.com>
PR libgfortran/16704
PR libfortran/16704
* io/read.c (read_radix): Understand letters f and F as hex digits.
2004-08-04 Victor Leikehman <lei@il.ibm.com>
......@@ -605,7 +605,7 @@
2004-08-03 Roger Sayle <roger@eyesopen.com>
PR libgfortran/16137
PR libfortran/16137
* configure.ac: Add tests for acosf, asinf, atan2f, atanf, ceilf,
copysignf, cosf, coshf, expf, floorf, frexpf, hypotf, logf, log10f,
scalbnf, sinf, sinhf, sqrtf, tanf and tanhf in libm.
......
libgfortran/ChangeLog-2005
2005-12-31 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/25594
PR libgfortran/25419
PR libfortran/25594
PR libfortran/25419
* io/list_read.c (list_formatted_read_scalar): Test for comma to return
a null value (default). Revert patch of 25419 on 2005-12-28.
2005-12-28 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/25139
PR libfortran/25139
* io/unix.c (fd_truncate): Set s->active to zero.
PR libgfortran/25510
PR libfortran/25510
* libgfortran.h: Add ERROR_INTERNAL and ERROR_INTERNAL_UNIT.
* runtime/error.c (translate_error): Add messages for new errors.
* io/list_read.c (next_char): Use new errors.
......@@ -17,32 +17,32 @@
2005-12-28 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/25550
PR libfortran/25550
* io/file_pos.c (st_rewind): Reset bytes left so no error occurs in
next_record_r.
2005-12-28 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/25419
PR libfortran/25419
* io/list_read.c (list_formatted_read_scalar): Allow comma to return a
null value (default).
2005-12-21 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/25307
PR libfortran/25307
* io/list_read.c (next_char): Handle end-of-file conditions for
internal units and add support for internal character array units.
2005-12-18 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/25463
PR libfortran/25463
* io/transfer.c (finalize_transfer): Fix execution order so that
next_record is set to zero in all cases.
2005-12-16 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/25264
PR libgfortran/25349
PR libfortran/25264
PR libfortran/25349
* io/unit.c (get_unit): Delete code that cleared the string when the
unit was opened, which is too soon.
* io/transfer.c (next_record_w): Pass done flag in. Change logic for
......@@ -104,7 +104,7 @@
2005-12-08 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/25039
PR libfortran/25039
* io/io.h: Create a new flag sf_read_comma to control comma
separators in numeric reads.
* io/transfer.c (formatted_transfer_scalar): Initialize the flag.
......@@ -131,7 +131,7 @@
2005-11-28 Steven G. Kargl <kargls@comcast.net>
PR libgfortran/25149
PR libfortran/25149
* intrinsics/abort.c: Add external abort_ to allow linking when
invoking -std=f95 in testsuite.
......@@ -154,7 +154,7 @@
2005-11-27 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/25109
PR libfortran/25109
* io/unit.c (init_units): Set default flag to BLANK_NULL per
requirement of F95 standard. Set PAD_YES for stdin.
......@@ -214,7 +214,7 @@
2005-11-26 Janne Blomqvist <jb@gcc.gnu.org>
PR libgfortran/24945
PR libfortran/24945
* io/open.c (edit_modes): Check for STATUS_UNKNOWN flag.
2005-11-25 Richard Henderson <rth@redhat.com>
......@@ -234,7 +234,7 @@
2005-11-22 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/24794
PR libfortran/24794
* io/list_read.c (read_character): Add auto completion on short
namelist reads.
......@@ -522,7 +522,7 @@
2005-11-12 Steven G. Kargl <kargls@comcast.net>
PR libgfortran/24787
PR libfortran/24787
* intrinsics/string_intrinsics.c (string_scan): Off by one; Fix typos
in nearby comment.
......@@ -611,7 +611,7 @@
2005-10-31 Jerry DeLisle <jvdelisle@verizon.net>
PR libgfortran/24584
PR libfortran/24584
* io/list_read.c (free_saved): Set saved_used to zero.
2005-10-30 Francois-Xavier Coudert <coudert@clipper.ens.fr>
......@@ -663,7 +663,7 @@
2005-10-24 Jerry DeLisle <jvdelisle@verizon.net>
PR libgfortran/24224
PR libfortran/24224
* libgfortran.h: Remove array stride error code.
* runtime/error.c: Remove array stride error.
* io/io.h: Change name of 'nml_loop_spec' to 'array_loop_spec' to be
......@@ -688,7 +688,7 @@
2005-10-23 Jerry DeLisle <jvdelisle@verizon.net>
PR libgfortran/24489
PR libfortran/24489
* io/transfer.c (read_block): Change the order of execution to not read
past end-of-record.
(read_block_direct): Same change.
......@@ -787,7 +787,7 @@
2005-10-11 Steven G. Kargl <kargls@comcast.net>
PR libgfortran/24313
PR libfortran/24313
* c99_functions.c (csqrtf, csqrt): Fix choice of branch cut. Note
csqrt{f} were imported from glibc, and this bug is still present
there. glibc PR is 1146.
......@@ -1375,7 +1375,7 @@
2005-07-11 David Edelsohn <edelsohn@gnu.org>
PR libgfortran/22412
PR libfortran/22412
* io/write.c (otoa): Bias p by SCRATCH_SIZE, not
sizeof (SCRATCH_SIZE).
(btoa): Same.
......@@ -2114,13 +2114,13 @@
2005-04-17 Paul Thomas <pault@gcc.gnu.org>
PR libgfortran/12884
PR libgfortran/17285
PR libgfortran/18122
PR libgfortran/18210
PR libgfortran/18392
PR libgfortran/18591
PR libgfortran/18879
PR libfortran/12884
PR libfortran/17285
PR libfortran/18122
PR libfortran/18210
PR libfortran/18392
PR libfortran/18591
PR libfortran/18879
* io/io.h (nml_ls): Declare.
(namelist_info): Modify for arrays.
* io/list_read.c (namelist_read): Reduced to call to new functions.
......@@ -2495,7 +2495,7 @@
2005-02-25 Peter O'Gorman <peter@pogma.com>
Toon Moene <toon@moene.indiv.nluug.nl>
PR libgfortran/17748
PR libfortran/17748
* runtime/environ.c: Remove references to environ.
(show_variables): remove GFORTRAN_UNBUFFERED_* and
GFORTRAN_NAME_* because they require environ.
......@@ -2534,8 +2534,8 @@
2005-02-01 Paul Thomas <paulthomas2@wanadoo.fr>
PR libgfortran/19363
PR libgfortran/19691
PR libfortran/19363
PR libfortran/19691
* libgfortran.h (isfinite): Work around broken isfinite(x) in Cygwin.
2005-01-30 Bud Davis <bdavis@gfortran.org>
......@@ -2572,7 +2572,7 @@
2005-01-22 David Edelsohn <edelsohn@gnu.org>
PR libgfortran/19052
PR libfortran/19052
* libgfortran.h (options_t): Add stderr_unit.
* io/io.h (error_stream): Declare.
* io/open.c (new_unit): Do not terminate abnormally if opening
......
libgfortran/intrinsics/cshift0.c
......@@ -103,6 +103,8 @@ cshift0 (gfc_array_char * ret, const gfc_array_char * array,
runtime_error ("Argument 'DIM' is out of range in call to 'CSHIFT'");
which = which - 1;
sstride[0] = 0;
rstride[0] = 0;
extent[0] = 1;
count[0] = 0;
......
libgfortran/intrinsics/unpack_generic.c
......@@ -209,6 +209,7 @@ unpack0 (gfc_array_char *ret, const gfc_array_char *vector,
{
gfc_array_char tmp;
memset (&tmp, 0, sizeof (tmp));
tmp.dtype = 0;
tmp.data = field;
unpack_internal (ret, vector, mask, &tmp, GFC_DESCRIPTOR_SIZE (vector), 0);
......@@ -228,6 +229,7 @@ unpack0_char (gfc_array_char *ret,
{
gfc_array_char tmp;
memset (&tmp, 0, sizeof (tmp));
tmp.dtype = 0;
tmp.data = field;
unpack_internal (ret, vector, mask, &tmp, vector_length, 0);
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment