aboutsummaryrefslogtreecommitdiff
path: root/gdb/ada-lang.c
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
commit40c8aaa9feda31a1f9f77caa30ab3e8eb94448a4 (patch)
treed3f0edea7ced12e41bcd9c76be5e68845249b645 /gdb/ada-lang.c
parentee90b9ab362f9a71b990d15627271bd5bbe81668 (diff)
downloadgdb-40c8aaa9feda31a1f9f77caa30ab3e8eb94448a4.zip
gdb-40c8aaa9feda31a1f9f77caa30ab3e8eb94448a4.tar.gz
gdb-40c8aaa9feda31a1f9f77caa30ab3e8eb94448a4.tar.bz2
* ada-lang.c (resolve_subexp): Correct arity of binary operators.
Diffstat (limited to 'gdb/ada-lang.c')
-rw-r--r--gdb/ada-lang.c3
1 files changed, 3 insertions, 0 deletions
diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c
index 7f96dea..326bcec 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: