Commit 47ed69db by Alexandre Oliva Committed by Alexandre Oliva

simplify.c (gfc_simplify_transfer): Zero-initialize the buffer.

* simplify.c (gfc_simplify_transfer): Zero-initialize the
buffer.

From-SVN: r144663
parent 8ae5dff1
2009-03-06 Alexandre Oliva <aoliva@redhat.com>
* simplify.c (gfc_simplify_transfer): Zero-initialize the
buffer.
2009-02-27 Tobias Burnus <burnus@net-b.de> 2009-02-27 Tobias Burnus <burnus@net-b.de>
PR fortran/39309 PR fortran/39309
......
...@@ -4541,6 +4541,7 @@ gfc_simplify_transfer (gfc_expr *source, gfc_expr *mold, gfc_expr *size) ...@@ -4541,6 +4541,7 @@ gfc_simplify_transfer (gfc_expr *source, gfc_expr *mold, gfc_expr *size)
/* Allocate the buffer to store the binary version of the source. */ /* Allocate the buffer to store the binary version of the source. */
buffer_size = MAX (source_size, result_size); buffer_size = MAX (source_size, result_size);
buffer = (unsigned char*)alloca (buffer_size); buffer = (unsigned char*)alloca (buffer_size);
memset (buffer, 0, buffer_size);
/* Now write source to the buffer. */ /* Now write source to the buffer. */
gfc_target_encode_expr (source, buffer, buffer_size); gfc_target_encode_expr (source, buffer, buffer_size);
......
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