gdb/testsuite/

[binutils-gdb.git] / gdb / jv-exp.y

diff --git a/gdb/jv-exp.y b/gdb/jv-exp.y
index 89ec3e9460771ad0400729a22b2ca70f617a9f18..8109e0c59a8535fde7a98414e58aa12a6a7639e1 100644 (file)
--- a/gdb/jv-exp.y
+++ b/gdb/jv-exp.y
@@ -1,5 +1,5 @@
 /* YACC parser for Java expressions, for GDB.
-   Copyright (C) 1997, 1998, 1999, 2000, 2006, 2007, 2008, 2009
+   Copyright (C) 1997, 1998, 1999, 2000, 2006, 2007, 2008, 2009, 2010
    Free Software Foundation, Inc.
 
    This file is part of GDB.
@@ -50,6 +50,7 @@
 #include "block.h"
 
 #define parse_type builtin_type (parse_gdbarch)
+#define parse_java_type builtin_java_type (parse_gdbarch)
 
 /* Remap normal yacc parser interface names (yyparse, yylex, yyerror, etc),
    as well as gratuitiously global symbol names, so we can have multiple
@@ -249,7 +250,7 @@ Literal:
                  write_exp_elt_opcode (OP_DOUBLE); }
 |      BOOLEAN_LITERAL
                { write_exp_elt_opcode (OP_LONG);
-                 write_exp_elt_type (java_boolean_type);
+                 write_exp_elt_type (parse_java_type->builtin_boolean);
                  write_exp_elt_longcst ((LONGEST)$1);
                  write_exp_elt_opcode (OP_LONG); }
 |      StringLiteral
@@ -265,7 +266,7 @@ Type:
 PrimitiveType:
        NumericType
 |      BOOLEAN
-               { $$ = java_boolean_type; }
+               { $$ = parse_java_type->builtin_boolean; }
 ;
 
 NumericType:
@@ -275,22 +276,22 @@ NumericType:
 
 IntegralType:
        BYTE
-               { $$ = java_byte_type; }
+               { $$ = parse_java_type->builtin_byte; }
 |      SHORT
-               { $$ = java_short_type; }
+               { $$ = parse_java_type->builtin_short; }
 |      INT
-               { $$ = java_int_type; }
+               { $$ = parse_java_type->builtin_int; }
 |      LONG
-               { $$ = java_long_type; }
+               { $$ = parse_java_type->builtin_long; }
 |      CHAR
-               { $$ = java_char_type; }
+               { $$ = parse_java_type->builtin_char; }
 ;
 
 FloatingPointType:
        FLOAT
-               { $$ = java_float_type; }
+               { $$ = parse_java_type->builtin_float; }
 |      DOUBLE
-               { $$ = java_double_type; }
+               { $$ = parse_java_type->builtin_double; }
 ;
 
 /* UNUSED:
@@ -546,7 +547,6 @@ CastExpression:
                  write_exp_elt_opcode (UNOP_CAST); }
 |      '(' Expression ')' UnaryExpressionNotPlusMinus
                {
-                 int exp_size = expout_ptr;
                  int last_exp_size = length_of_subexp(expout, expout_ptr);
                  struct type *type;
                  int i;
@@ -765,12 +765,12 @@ parse_number (char *p, int len, int parsed_float, YYSTYPE *putithere)
   limit = ((limit << 16) << 16) | limit;
   if (c == 'l' || c == 'L')
     {
-      type = java_long_type;
+      type = parse_java_type->builtin_long;
       len--;
     }
   else
     {
-      type = java_int_type;
+      type = parse_java_type->builtin_int;
     }
   limit_div_base = limit / (ULONGEST) base;
 
@@ -794,12 +794,12 @@ parse_number (char *p, int len, int parsed_float, YYSTYPE *putithere)
        }
 
   /* If the type is bigger than a 32-bit signed integer can be, implicitly
-     promote to long.  Java does not do this, so mark it as builtin_type_uint64
-     rather than java_long_type.  0x80000000 will become -0x80000000 instead
-     of 0x80000000L, because we don't know the sign at this point.
-  */
-  if (type == java_int_type && n > (ULONGEST)0x80000000)
-    type = builtin_type_uint64;
+     promote to long.  Java does not do this, so mark it as
+     parse_type->builtin_uint64 rather than parse_java_type->builtin_long.
+     0x80000000 will become -0x80000000 instead of 0x80000000L, because we
+     don't know the sign at this point.  */
+  if (type == parse_java_type->builtin_int && n > (ULONGEST)0x80000000)
+    type = parse_type->builtin_uint64;
 
   putithere->typed_val_int.val = n;
   putithere->typed_val_int.type = type;
@@ -897,12 +897,12 @@ yylex (void)
       lexptr++;
       c = *lexptr++;
       if (c == '\\')
-       c = parse_escape (&lexptr);
+       c = parse_escape (parse_gdbarch, &lexptr);
       else if (c == '\'')
        error (_("Empty character constant"));
 
       yylval.typed_val_int.val = c;
-      yylval.typed_val_int.type = java_char_type;
+      yylval.typed_val_int.type = parse_java_type->builtin_char;
 
       c = *lexptr++;
       if (c != '\'')
@@ -1060,7 +1060,7 @@ yylex (void)
            break;
          case '\\':
            tokptr++;
-           c = parse_escape (&tokptr);
+           c = parse_escape (parse_gdbarch, &tokptr);
            if (c == -1)
              {
                continue;
@@ -1357,7 +1357,6 @@ push_expression_name (struct stoken name)
 {
   char *tmp;
   struct type *typ;
-  char *ptr;
   int i;
 
   for (i = 0;  i < name.length;  i++)