MatCat.OpenSource/8sa1-binutils-gdb
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

* valops.c (value_cast, value_slice), parse.c (follow_types): Add

Browse Source 
FIXME-type-allocation comments.
This commit is contained in:
Jim Kingdon 1995-03-14 14:59:24 +00:00
parent a3012272b0
commit 36633dcc4a
3 changed files with 12 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
gdb/ChangeLog
View File

@ -1,5 +1,8 @@
Tue Mar 14 05:52:36 1995 Jim Kingdon (kingdon@lioth.cygnus.com)
* valops.c (value_cast, value_slice), parse.c (follow_types): Add
FIXME-type-allocation comments.
* gdbtypes.h (struct type): Fix comment about what units the
TYPE_LENGTH is in.

4
gdb/parse.c
View File

@ -875,6 +875,8 @@ follow_types (follow_type)
break;
case tp_array:
array_size = pop_type_int ();
/* FIXME-type-allocation: need a way to free this type when we are
done with it. */
range_type =
create_range_type ((struct type *) NULL,
builtin_type_int, 0,
@ -887,6 +889,8 @@ follow_types (follow_type)
= BOUND_CANNOT_BE_DETERMINED;
break;
case tp_function:
/* FIXME-type-allocation: need a way to free this type when we are
done with it. */
follow_type = lookup_function_type (follow_type);
break;
}

5
gdb/valops.c
View File

@ -140,6 +140,8 @@ value_cast (type, arg2)
int new_length = val_length / TYPE_LENGTH (element_type);
if (val_length % TYPE_LENGTH (element_type) != 0)
warning("array element type size does not divide object size in cast");
/* FIXME-type-allocation: need a way to free this type when we are
done with it. */
range_type = create_range_type ((struct type *) NULL,
TYPE_TARGET_TYPE (range_type),
low_bound, new_length + low_bound - 1);
@ -2054,6 +2056,7 @@ value_slice (array, lowbound, length)
value_ptr array;
int lowbound, length;
{
COERCE_VARYING_ARRAY (array);
if (TYPE_CODE (VALUE_TYPE (array)) == TYPE_CODE_BITSTRING)
error ("not implemented - bitstring slice");
if (TYPE_CODE (VALUE_TYPE (array)) != TYPE_CODE_ARRAY
@ -2071,6 +2074,8 @@ value_slice (array, lowbound, length)
if (lowbound < lowerbound || length < 0
|| lowbound + length - 1 > upperbound)
error ("slice out of range");
/* FIXME-type-allocation: need a way to free this type when we are
done with it. */
slice_range_type = create_range_type ((struct type*) NULL,
TYPE_TARGET_TYPE (range_type),
lowerbound,