summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJoel Brobecker <brobecker@gnat.com>2007-08-15 18:43:15 +0000
committerJoel Brobecker <brobecker@gnat.com>2007-08-15 18:43:15 +0000
commite2dc0abf31fe45ff1d723884c55e287d92200f85 (patch)
treec384ac582925e5be77621fadf21ad4ba54f468b4
parenta178d1dcbfbece1244cd30fe1c3b44f2510238b2 (diff)
downloadgdb-e2dc0abf31fe45ff1d723884c55e287d92200f85.tar.gz
* ada-lang.c (resolve_subexp): Correct arity of binary operators.
-rw-r--r--gdb/ChangeLog5
-rw-r--r--gdb/ada-lang.c3
2 files changed, 8 insertions, 0 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 73c794b8e85..9869828da39 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,6 +1,11 @@
2007-08-15 Paul Hilfinger <hilfinger@adacore.com>
Joel Brobecker <brobecker@adacore.com>
+ * ada-lang.c (resolve_subexp): Correct arity of binary operators.
+
+2007-08-15 Paul Hilfinger <hilfinger@adacore.com>
+ Joel Brobecker <brobecker@adacore.com>
+
* ada-lang.c (possible_user_operator_p): Alternative fix to last
checkin guarding against NULL.
diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c
index 7f96dea72b4..326bcec7491 100644
--- a/gdb/ada-lang.c
+++ b/gdb/ada-lang.c
@@ -2691,6 +2691,9 @@ resolve_subexp (struct expression **expp, int *pos, int deprocedure_p,
case BINOP_REPEAT:
case BINOP_SUBSCRIPT:
case BINOP_COMMA:
+ *pos += 1;
+ nargs = 2;
+ break;
case UNOP_NEG:
case UNOP_PLUS: