diff options
| -rw-r--r-- | gdb/ChangeLog | 5 | ||||
| -rw-r--r-- | gdb/ada-lang.c | 4 |
2 files changed, 7 insertions, 2 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog index 54fc96a..c141fac 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,3 +1,8 @@ +2015-10-13 Pedro Alves <palves@redhat.com> + + * ada-lang.c (ada_value_primitive_packed_val): Add casts to malloc + and alloca calls. + 2015-10-13 Simon Marchi <simon.marchi@polymtl.ca> * lm32-tdep.c (lm32_push_dummy_call): Replace call to diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c index 97f0c49..6d1998a 100644 --- a/gdb/ada-lang.c +++ b/gdb/ada-lang.c @@ -2550,7 +2550,7 @@ ada_value_primitive_packed_val (struct value *obj, const gdb_byte *valaddr, we do, is unpack the data into a byte-aligned buffer, and then use that buffer as our object's value for resolving the type. */ staging_len = (bit_size + HOST_CHAR_BIT - 1) / HOST_CHAR_BIT; - staging = malloc (staging_len); + staging = (gdb_byte *) malloc (staging_len); make_cleanup (xfree, staging); ada_unpack_from_contents (src, bit_offset, bit_size, @@ -2581,7 +2581,7 @@ ada_value_primitive_packed_val (struct value *obj, const gdb_byte *valaddr, int src_len = (bit_size + bit_offset + HOST_CHAR_BIT - 1) / 8; v = value_at (type, value_address (obj) + offset); - src = alloca (src_len); + src = (gdb_byte *) alloca (src_len); read_memory (value_address (v), src, src_len); } else |