diff options
author | aoliva <aoliva@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-03-06 09:06:51 +0000 |
---|---|---|
committer | aoliva <aoliva@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-03-06 09:06:51 +0000 |
commit | b304527910c2e947c172e6a7d7ff4da82a8f2c03 (patch) | |
tree | 2dadbada4580ef9771695b019833c4b51692a5e8 /gcc/fortran/simplify.c | |
parent | c6f5195aa7cc33c7f52b69d4d91086940def0ff0 (diff) | |
download | gcc-b304527910c2e947c172e6a7d7ff4da82a8f2c03.tar.gz |
* simplify.c (gfc_simplify_transfer): Zero-initialize the
buffer.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@144663 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran/simplify.c')
-rw-r--r-- | gcc/fortran/simplify.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/fortran/simplify.c b/gcc/fortran/simplify.c index 6893a88c433..7be4671acfb 100644 --- a/gcc/fortran/simplify.c +++ b/gcc/fortran/simplify.c @@ -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. */ buffer_size = MAX (source_size, result_size); buffer = (unsigned char*)alloca (buffer_size); + memset (buffer, 0, buffer_size); /* Now write source to the buffer. */ gfc_target_encode_expr (source, buffer, buffer_size); |