Missing space before '(' in ada-lang.c::ada_evaluate_subexp

gdb/ChangeLog:

        * ada-lang.c (ada_evaluate_subexp): Add missing space before '('
        in call to TYPE_CODE macro.
This commit is contained in:
Joel Brobecker 2014-03-10 14:45:26 +01:00
parent 8668be63cf
commit 023db19c6b
2 changed files with 8 additions and 3 deletions

View File

@ -1,3 +1,8 @@
2014-03-10 Joel Brobecker <brobecker@adacore.com>
* ada-lang.c (ada_evaluate_subexp): Add missing space before '('
in call to TYPE_CODE macro.
2014-03-10 Jerome Guitton <guitton@adacore.com>
* ada-lang.c (ada_evaluate_subexp) <UNOP_IND, STRUCTOP_STRUCT>:

View File

@ -10112,7 +10112,7 @@ ada_evaluate_subexp (struct type *expect_type, struct expression *exp,
The latter should be shown as usual (as a pointer), whereas
a reference should mostly be transparent to the user. */
if (ada_is_tagged_type (type, 0)
|| (TYPE_CODE(type) == TYPE_CODE_REF
|| (TYPE_CODE (type) == TYPE_CODE_REF
&& ada_is_tagged_type (TYPE_TARGET_TYPE (type), 0)))
{
/* Tagged types are a little special in the fact that the real
@ -10740,8 +10740,8 @@ ada_evaluate_subexp (struct type *expect_type, struct expression *exp,
This means that we need to evaluate completely the
expression in order to get its type. */
if ((TYPE_CODE(type) == TYPE_CODE_REF
|| TYPE_CODE(type) == TYPE_CODE_PTR)
if ((TYPE_CODE (type) == TYPE_CODE_REF
|| TYPE_CODE (type) == TYPE_CODE_PTR)
&& ada_is_tagged_type (TYPE_TARGET_TYPE (type), 0))
{
arg1 = evaluate_subexp (NULL_TYPE, exp, &preeval_pos,