* ch-exp.c (parse_primval): in case ARRAY: Add missing FORWARD_TOKEN ().

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 242978b..3ca12e8 100644 (file)
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,7 @@
+Tue Jan  9 04:44:47 1996  Wilfried Moser (Alcatel)  <moser@rtl.cygnus.com>
+
+       * ch-exp.c (parse_primval): in case ARRAY: Add missing FORWARD_TOKEN ().
+
 Mon Jan  8 13:29:34 1996  Stan Shebs  <shebs@andros.cygnus.com>
 
        * remote-mips.c (mips_receive_header): Recognize \012 instead

diff --git a/gdb/ch-exp.c b/gdb/ch-exp.c
index 31c92b5..492f376 100644 (file)
--- a/gdb/ch-exp.c
+++ b/gdb/ch-exp.c
@@ -642,6 +642,7 @@ parse_primval ()
       if (PEEK_TOKEN () != TYPENAME)
        error ("missing MODENAME after ARRAY()");
       type = PEEK_LVAL().tsym.type;
+      FORWARD_TOKEN ();
       expect ('(', NULL);
       parse_expr ();
       expect (')', "missing right parenthesis");