diff options
| author | Stan Shebs <shebs@codesourcery.com> | 1994-09-07 00:23:16 +0000 |
|---|---|---|
| committer | Stan Shebs <shebs@codesourcery.com> | 1994-09-07 00:23:16 +0000 |
| commit | 22d7f91e32bda141f2d866c3e7dd967141dcf696 (patch) | |
| tree | 0cbdacd58990a3c1cbc336783dded7905fe1825b /gdb/c-typeprint.c | |
| parent | 6ceff8e7d2bcd87fc647a9cc8c37b51f56865eac (diff) | |
| download | gdb-22d7f91e32bda141f2d866c3e7dd967141dcf696.zip gdb-22d7f91e32bda141f2d866c3e7dd967141dcf696.tar.gz gdb-22d7f91e32bda141f2d866c3e7dd967141dcf696.tar.bz2 | |
* c-typeprint.c (c_type_print_varspec_prefix,
c_type_print_varspec_suffix): Add cases for Fortran type codes.
* eval.c (evaluate_subexp): For OP_ARRAY expressions in Fortran,
call f77_value_literal_string instead.
* f_exp.y: Include <string.h>, move include of parser-defs.h.
(parse_number): Translate 'd' floats to 'e' so atof() works.
(yylex): Remove unused variables.
* f-lang.c: Include <string.h>.
(get_bf_for_fcn): Remove unused variable.
* f-typeprint.c (f_type_print_varspec_prefix,
f_type_print_varspec_suffix): Remove unused
variables, add cases to switch statements.
(f_type_print_base): Remove unused variables.
* f-valprint.c (gdbcore.h, command.h): Include.
(f77_get_dynamic_lowerbound, f77_get_dynamic_upperbound):
Call read_memory_integer with correct number of arguments.
(f77_get_dynamic_upperbound): Call f77_get_dynamic_lowerbound
with correct argument type.
(f77_print_array): Removed unused array array_size_array.
(f_val_print): Don't use a CORE_ADDR as a char *.
* valops.c (value_cast): Handle COMPLEX and BOOL types.
(value_assign): Handle Fortran literal string and complex values.
(f77_cast_into_complex, f77_assign_from_literal_string,
f77_assign_from_literal_complex): New functions.
Diffstat (limited to 'gdb/c-typeprint.c')
| -rw-r--r-- | gdb/c-typeprint.c | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/gdb/c-typeprint.c b/gdb/c-typeprint.c index 60268b2..6d5a85a 100644 --- a/gdb/c-typeprint.c +++ b/gdb/c-typeprint.c @@ -312,6 +312,9 @@ c_type_print_varspec_prefix (type, stream, show, passed_a_ptr) case TYPE_CODE_RANGE: case TYPE_CODE_STRING: case TYPE_CODE_BITSTRING: + case TYPE_CODE_COMPLEX: + case TYPE_CODE_LITERAL_COMPLEX: + case TYPE_CODE_LITERAL_STRING: /* These types need no prefix. They are listed here so that gcc -Wall will reveal any types that haven't been handled. */ break; @@ -436,6 +439,9 @@ c_type_print_varspec_suffix (type, stream, show, passed_a_ptr, demangled_args) case TYPE_CODE_RANGE: case TYPE_CODE_STRING: case TYPE_CODE_BITSTRING: + case TYPE_CODE_COMPLEX: + case TYPE_CODE_LITERAL_COMPLEX: + case TYPE_CODE_LITERAL_STRING: /* These types do not need a suffix. They are listed so that gcc -Wall will report types that may not have been considered. */ break; |