gold: Add sparc IFUNC support to Gold.
[deliverable/binutils-gdb.git] / gdb / p-exp.y
index 7b05d585f59b91914efa6738b6a384913ab815de..5d344a47310c975a78bab7a7b48910dedf24dded 100644 (file)
 #define yygindex pascal_yygindex
 #define yytable         pascal_yytable
 #define yycheck         pascal_yycheck
+#define yyss   pascal_yyss
+#define yysslim        pascal_yysslim
+#define yyssp  pascal_yyssp
+#define yystacksize pascal_yystacksize
+#define yyvs   pascal_yyvs
+#define yyvsp  pascal_yyvsp
 
 #ifndef YYDEBUG
 #define        YYDEBUG 1               /* Default to yydebug support */
@@ -338,7 +344,7 @@ exp :       field_exp COMPLETE
 
 exp    :       exp '['
                        /* We need to save the current_type value.  */
-                       { char *arrayname;
+                       { const char *arrayname;
                          int arrayfieldindex;
                          arrayfieldindex = is_pascal_string_type (
                                current_type, NULL, NULL,
@@ -1093,9 +1099,8 @@ static const struct token tokentab2[] =
 
 /* Allocate uppercased var: */
 /* make an uppercased copy of tokstart.  */
-static char * uptok (tokstart, namelen)
-  char *tokstart;
-  int namelen;
+static char *
+uptok (char *tokstart, int namelen)
 {
   int i;
   char *uptokstart = (char *)malloc(namelen+1);
@@ -1732,8 +1737,7 @@ yylex (void)
 }
 
 void
-yyerror (msg)
-     char *msg;
+yyerror (char *msg)
 {
   if (prev_lexptr)
     lexptr = prev_lexptr;
This page took 0.02413 seconds and 4 git commands to generate.