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.

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index f0e2f423ec14bc1604758bdab2a6583259ef40b6..3328043b814e4b7c2d7ec6c525882b930c0736b1 100644 (file)
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -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>:

diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c
index e36a64bc2d28300a21081cdc0654359cadfee629..31aa38088c0818065bf6052a971b613ab07db694 100644 (file)
--- a/gdb/ada-lang.c
+++ b/gdb/ada-lang.c
@@ -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,