forked from Imagelibrary/binutils-gdb
Remove C/C++ relevant code in Fortran specific file.
Remove code relevant for printing C/C++ Integer values in a Fortran specific file to unify printing of Fortran values. This does not change the output.
This commit is contained in:
committed by
Tim Wiederhake
parent
e0f86435f8
commit
469412dd9c
@@ -310,22 +310,8 @@ f_val_print (struct type *type, int embedded_offset,
|
||||
original_value, &opts, 0, stream);
|
||||
}
|
||||
else
|
||||
{
|
||||
val_print_scalar_formatted (type, embedded_offset,
|
||||
original_value, options, 0, stream);
|
||||
/* C and C++ has no single byte int type, char is used instead.
|
||||
Since we don't know whether the value is really intended to
|
||||
be used as an integer or a character, print the character
|
||||
equivalent as well. */
|
||||
if (TYPE_LENGTH (type) == 1)
|
||||
{
|
||||
LONGEST c;
|
||||
|
||||
fputs_filtered (" ", stream);
|
||||
c = unpack_long (type, valaddr + embedded_offset);
|
||||
LA_PRINT_CHAR ((unsigned char) c, type, stream);
|
||||
}
|
||||
}
|
||||
val_print_scalar_formatted (type, embedded_offset,
|
||||
original_value, options, 0, stream);
|
||||
break;
|
||||
|
||||
case TYPE_CODE_STRUCT:
|
||||
|
||||
Reference in New Issue
Block a user