aboutsummaryrefslogtreecommitdiff
path: root/gdb
diff options
context:
space:
mode:
Diffstat (limited to 'gdb')
-rw-r--r--gdb/ChangeLog12
-rw-r--r--gdb/ch-exp.y2
-rw-r--r--gdb/ch-valprint.c19
3 files changed, 15 insertions, 18 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 8cf862f..69512a6 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,15 @@
+Mon Dec 21 22:24:33 1992 Fred Fish (fnf@cygnus.com)
+
+ * valprint.c (val_print): Reorganize comment and add note
+ about dependency on target byte ordering.
+ **** start-sanitize-chill ****
+ * ch-exp.y (value_array_slice): Fix typo.
+ * ch-valprint.c (chill_val_print): Remove C'ism that arrays of
+ byte sized ints are assumed to be char strings and printed with
+ string syntax. In chill, arrays of chars and arrays of
+ bytes/ubytes are distinquishable, and printed appropriately.
+ **** end-sanitize-chill ****
+
Mon Dec 21 18:02:35 1992 Stu Grossman (grossman at cygnus.com)
* tm-hppah.h: #define NEED_TEXT_START_END for target memory
diff --git a/gdb/ch-exp.y b/gdb/ch-exp.y
index ce2bbfe..141463d 100644
--- a/gdb/ch-exp.y
+++ b/gdb/ch-exp.y
@@ -474,7 +474,7 @@ value_array_slice: array_primitive_value '(' lower_element ':' upper_element ')'
{
$$ = 0; /* FIXME */
}
- | array_primitive_value '(' first_element UP slice_size '('
+ | array_primitive_value '(' first_element UP slice_size ')'
{
$$ = 0; /* FIXME */
}
diff --git a/gdb/ch-valprint.c b/gdb/ch-valprint.c
index 8ffa1af..8c80bc4 100644
--- a/gdb/ch-valprint.c
+++ b/gdb/ch-valprint.c
@@ -51,9 +51,6 @@ chill_val_print (type, valaddr, address, stream, format, deref_ref, recurse,
int recurse;
enum val_prettyprint pretty;
{
- unsigned len;
- struct type *elttype;
- unsigned eltlen;
LONGEST val;
switch (TYPE_CODE (type))
@@ -61,25 +58,13 @@ chill_val_print (type, valaddr, address, stream, format, deref_ref, recurse,
case TYPE_CODE_ARRAY:
if (TYPE_LENGTH (type) > 0 && TYPE_LENGTH (TYPE_TARGET_TYPE (type)) > 0)
{
- elttype = TYPE_TARGET_TYPE (type);
- eltlen = TYPE_LENGTH (elttype);
- len = TYPE_LENGTH (type) / eltlen;
if (prettyprint_arrays)
{
print_spaces_filtered (2 + 2 * recurse, stream);
}
fprintf_filtered (stream, "[");
- /* For an array of chars, print with string syntax. */
- if (eltlen == 1 && TYPE_CODE (elttype) == TYPE_CODE_INT
- && (format == 0 || format == 's') )
- {
- LA_PRINT_STRING (stream, valaddr, len, 0);
- }
- else
- {
- val_print_array_elements (type, valaddr, address, stream,
- format, deref_ref, recurse, pretty, 0);
- }
+ val_print_array_elements (type, valaddr, address, stream, format,
+ deref_ref, recurse, pretty, 0);
fprintf_filtered (stream, "]");
}
else