cyacc.tab.c

Go to the documentation of this file.

/* A Bison parser, made by GNU Bison 3.8.2.  */
 
/* Bison implementation for Yacc-like parsers in C
 
   Copyright (C) 1984, 1989-1990, 2000-2015, 2018-2021 Free Software Foundation,
   Inc.
 
   This program is free software: you can redistribute it and/or modify
   it under the terms of the GNU General Public License as published by
   the Free Software Foundation, either version 3 of the License, or
   (at your option) any later version.
 
   This program is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   GNU General Public License for more details.
 
   You should have received a copy of the GNU General Public License
   along with this program.  If not, see <https://www.gnu.org/licenses/>.  */
 
/* As a special exception, you may create a larger work that contains
   part or all of the Bison parser skeleton and distribute that work
   under terms of your choice, so long as that work isn't itself a
   parser generator using the skeleton or a modified version thereof
   as a parser skeleton.  Alternatively, if you modify or redistribute
   the parser skeleton itself, you may (at your option) remove this
   special exception, which will cause the skeleton and the resulting
   Bison output files to be licensed under the GNU General Public
   License without this special exception.
 
   This special exception was added by the Free Software Foundation in
   version 2.2 of Bison.  */
 
/* C LALR(1) parser skeleton written by Richard Stallman, by
   simplifying the original so-called "semantic" parser.  */
 
/* DO NOT RELY ON FEATURES THAT ARE NOT DOCUMENTED in the manual,
   especially those whose name start with YY_ or yy_.  They are
   private implementation details that can be changed or removed.  */
 
/* All symbols defined below should begin with yy or YY, to avoid
   infringing on user name space.  This should be done even for local
   variables, as they might otherwise be expanded by user macros.
   There are some unavoidable exceptions within include files to
   define necessary library symbols; they are noted "INFRINGES ON
   USER NAME SPACE" below.  */
 
/* Identify Bison output, and Bison version.  */
#define YYBISON 30802
 
/* Bison version string.  */
#define YYBISON_VERSION "3.8.2"
 
/* Skeleton name.  */
#define YYSKELETON_NAME "yacc.c"
 
/* Pure parsers.  */
#define YYPURE 0
 
/* Push parsers.  */
#define YYPUSH 0
 
/* Pull parsers.  */
#define YYPULL 1
 
 
/* Substitute the variable and function names.  */
#define yyparse         c_parse
#define yylex           c_lex
#define yyerror         c_error
#define yydebug         c_debug
#define yynerrs         c_nerrs
#define yylval          c_lval
#define yychar          c_char
 
/* First part of user prologue.  */
#line 52 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
 
#ifdef HAVE_CONFIG_H
    #include "pips_config.h"
#endif
 /* C declarations */
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <ctype.h>
 
#include "genC.h"
#include "linear.h"
#include "ri.h"
#include "ri-util.h"
#include "text-util.h"
#include "misc.h"
#include "properties.h"
 
#include "c_parser_private.h"
 
#include "c_syntax.h"
 
#define C_ERROR_VERBOSE 1 /* much clearer error messages with bison */
 
/* Increase the parser stack to have SPEC2006/445.gobmk/owl_defendpat.c
   going through without a:
 
   user warning in splitc_error: C memory exhausted near "0" at preprocessed line 13459 (user line 8732)
*/
#define YYMAXDEPTH 1000000
 
// To set breakpoint in cyacc.y
// void breakpoint(int l) {;}
// #define BREAKPOINT breakpoint(__LINE__)
#define BREAKPOINT ;
 
static int CurrentMode = 0; /**< to know the mode of the formal parameter: by value or by reference*/
static bool is_external = true; /**< to know if the variable is declared inside or outside a function, so its scope
                                   is the current function or the compilation unit or TOP-LEVEL*/
static int enum_counter = 0; /**< to compute the enumerator value: val(i) = val(i-1) + 1 */
static int abstract_counter = 1; /**< to create temporary entities for abstract types */
 
 static list initialization_expressions = NIL; /**< to preserve information about the declarations for the prettyprinter, especially for the global variables, but also the derived types (struct, union, enum). */
 
 /* init_p = 0 => no initialization for a variable or no definition
    for a derived entity (struct, union, maybe enum) */
static void add_initialization_expression(int init_p)
{
  initialization_expressions
    = CONS(EXPRESSION, int_to_expression(init_p), initialization_expressions);
}
 
/* The following structures must be stacks because all the related
   entities are in recursive structures.  Since there are not stacks
   with basic types such as integer or logical domain, I used
   basic_domain to avoid creating special stacks for FormalStack,
   OffsetStack, ... */
 
static void PushFunction(entity f)
{
  stack_push((char *) f, FunctionStack);
}
 
static void PopFunction()
{
  stack_pop(FunctionStack);
 }
 
entity GetFunction()
{
  entity f = stack_head(FunctionStack);
  return f;
}
 
 // FI: I assumed it was the current context; in fact the current
 // context is rather the top of the ContextStack. I tried to maintain
 // as an invariant ycontext==stack_head(ContextStack). But this is not
 // be a good idea as it interferes with cyacc.y use of ycontext and
 // ContextStack
static c_parser_context ycontext = c_parser_context_undefined;
 
␌
/* FI: these two variables are used in conjunction with comma
   expressions. I do not remember why they are needed. They sometimes
   stay set although they have become useless. The parser used not to
   reset them systematically, which caused problems with
   io_intrinsics*.c */
static string expression_comment = string_undefined;
static int expression_line_number = STATEMENT_NUMBER_UNDEFINED;
 
/* we don't want an expression comment with new lines, it is disgracefull */
void reset_expression_comment()
{
  if(!string_undefined_p(expression_comment)) {
    /* Too bad. This should not happen, but it happens with comma
       expressions in header files */
    free(expression_comment);
    expression_comment = string_undefined;
  }
 
  expression_line_number = STATEMENT_NUMBER_UNDEFINED;
}
 
/* flushes all expression comments and add them to statement s */
static statement flush_expression_comment(statement s) {
  if(!empty_comments_p(expression_comment)) {
    if(!empty_comments_p(statement_comments(s))) {
          char *tmp = statement_comments(s);
          asprintf(&statement_comments(s),"%s%s",statement_comments(s),expression_comment);
          free(tmp);
      free(expression_comment);
    }
    else
      statement_comments(s) = expression_comment;
        statement_number(s) = expression_line_number;
        expression_line_number = STATEMENT_NUMBER_UNDEFINED;
    expression_comment=string_undefined;
  }
  return s;
}
 
 
/* after a while (crocodile) expression comments are pushed into a list that
   is purged upon call to add_expression_comment */ 
static list all_expression_comments_as_statement_comments = NIL;
static void save_expression_comment_as_statement_comment() {
        if(!string_undefined_p(expression_comment)) {
                all_expression_comments_as_statement_comments = 
                CONS(STRING,expression_comment, all_expression_comments_as_statement_comments);
        }
    expression_comment=string_undefined;
}
/* flushes all statement comments and add them to statement s */
static statement flush_statement_comment(statement s) {
  s=flush_expression_comment(s); // should not be necessary 
  if(!ENDP(all_expression_comments_as_statement_comments)) {
    pips_assert("not on a block",!statement_block_p(s));
    all_expression_comments_as_statement_comments = gen_nreverse(all_expression_comments_as_statement_comments);
    char * comments = list_to_string(all_expression_comments_as_statement_comments);
    if(!empty_comments_p(statement_comments(s))) {
          char *tmp = statement_comments(s);
          asprintf(&statement_comments(s),"%s%s",statement_comments(s), comments);
          free(tmp);
          free(comments);
    }
    else
      statement_comments(s) = comments;
    FOREACH(STRING,s,all_expression_comments_as_statement_comments) free(s);
    gen_free_list(all_expression_comments_as_statement_comments);
    all_expression_comments_as_statement_comments=NIL;
  }
  return s;
}
␌
 
/* The scope is moved up the scope tree and a NULL is return when
   there are no more scope to explore. */
string pop_block_scope(string old_scope)
{
  string new_scope = old_scope;
  string last_scope = string_undefined;
 
  pips_debug(8, "old_scope = \"%s\"\n", old_scope);
  pips_assert("old_scope is a scope", string_block_scope_p(old_scope));
 
  if(strlen(old_scope)>0) {
    /* get rid of last block separator */
    new_scope[strlen(new_scope)-1] = '\0';
    last_scope = strrchr(new_scope, BLOCK_SEP_CHAR);
 
    if(last_scope==NULL)
      *new_scope = '\0';
    else
      *(last_scope+1) = '\0';
  }
  else
    new_scope = NULL;
 
  if(new_scope!=NULL) {
    pips_debug(8, "new_scope = \"%s\"\n", new_scope);
    pips_assert("new_scope is a scope", string_block_scope_p(new_scope));
  }
  else {
    pips_debug(8, "new_scope = NULL\n");
  }
 
  return new_scope;
}
 
/* Allocate a new string containing only block scope information */
string scope_to_block_scope(string full_scope)
{
  string l_scope = strrchr(full_scope, BLOCK_SEP_CHAR);
  string f_scope = strchr(full_scope, MODULE_SEP);
  string block_scope = string_undefined;
 
  pips_debug(8, "full_scope = \"%s\"\n", full_scope);
 
  if(f_scope==NULL)
    f_scope = full_scope;
  else
    f_scope++;
 
  if(l_scope==NULL)
    block_scope = strdup("");
  else
    block_scope = gen_strndup0(f_scope, (unsigned) (l_scope-f_scope+1));
 
  pips_debug(8, "f_scope = \"%s\", l_scope = \"%s\"\n", f_scope, l_scope);
  pips_assert("block_scope is a scope", string_block_scope_p(block_scope));
 
  return block_scope;
}
 
c_parser_context CreateDefaultContext()
{
  c_parser_context c = make_c_parser_context(empty_scope(),
                                             type_undefined,
                                             storage_undefined,
                                             NIL,
                                             false,
                                             false);
  pips_debug(8, "New default context %p\n", c);
  return c;
}
 
static int C_scope_identifier = -2;
 
void InitScope()
{
  C_scope_identifier = -1;
}
 
static void EnterScope()
{
  c_parser_context nc = CreateDefaultContext();
  string cs = string_undefined;
 
  push_new_c_parser_scope(); // For the lexical analyzer
 
  pips_assert("C_scope_identifier has been initialized", C_scope_identifier>-2);
 
  if(!stack_empty_p(ContextStack)) {
    c_parser_context c = (c_parser_context) stack_head(ContextStack);
    pips_assert("The current context is defined", !c_parser_context_undefined_p(c));
    pips_assert("The current context scope is defined",
                !string_undefined_p(c_parser_context_scope(c))
                && c_parser_context_scope(c)!=NULL);
    pips_assert("The current context only contains scope information",
                //type_undefined_p(c_parser_context_type(c)) &&
                storage_undefined_p(c_parser_context_storage(c))
                && ENDP(c_parser_context_qualifiers(c))
                //&& !c_parser_context_typedef(c)
                //&& !c_parser_context_static(c)
                );
    cs = c_parser_context_scope(c);
    pips_assert("scope contains only block scope information", string_block_scope_p(cs));
  }
  else
    cs = "";
 
  // Add scope information if any
  C_scope_identifier++;
  // A scope is needed right away to distinguish between formal
  // parameters and local variables. See
  // Validation/C_syntax/block_scope01.c, identifier x in function foo
  if(C_scope_identifier>=0) {
    string ns = int2a(C_scope_identifier);
 
    char * stf = c_parser_context_scope(nc);
    c_parser_context_scope(nc) = strdup(concatenate(cs, ns, BLOCK_SEP_STRING, NULL));
        free(stf);
    free(ns);
  }
  else {
    char * stf = c_parser_context_scope(nc);
    c_parser_context_scope(nc) = strdup(cs);
        free(stf);
  }
 
  stack_push((char *) nc, ContextStack);
  //ycontext = nc;
  //pips_assert("ycontext is consistant with stack_head(ContextStack)",
  //          ycontext==stack_head(ContextStack));
  pips_debug(8, "New block scope string: \"%s\" for context %p\n",
             c_parser_context_scope(nc), nc);
}
 
int ScopeStackSize()
{
  return stack_size(ContextStack);
}
 
string GetScope()
{
  string s = "";
 
  /* FI: I do not know if it wouldn't be better to initialize the
     ContextStack with a default context before calling the C
     parser */
  if(!stack_empty_p(ContextStack)) {
    c_parser_context c = (c_parser_context) stack_head(ContextStack);
 
    s = c_parser_context_scope(c);
  }
 
  return s;
}
 
string GetParentScope()
{
  string s = "";
 
  if(!stack_empty_p(ContextStack) && stack_size(ContextStack)>=2) {
    c_parser_context c = (c_parser_context) stack_nth(ContextStack,2);
 
    s = c_parser_context_scope(c);
  }
 
  return s;
}
 
void ExitScope()
{
  c_parser_context c = (c_parser_context) stack_head(ContextStack);
 
  pop_c_parser_scope_stack();
 
  pips_assert("The current context is defined", !c_parser_context_undefined_p(c));
  pips_assert("The current context scope is defined",
              !string_undefined_p(c_parser_context_scope(c))
              && c_parser_context_scope(c)!=NULL);
  pips_assert("The current context only contains scope information",
              //type_undefined_p(c_parser_context_type(c)) &&
              storage_undefined_p(c_parser_context_storage(c))
              && ENDP(c_parser_context_qualifiers(c))
              //&& !c_parser_context_typedef(c)
              //&& !c_parser_context_static(c)
              );
  pips_debug(8, "Exiting context scope \"\%s\" in context %p\n",
             c_parser_context_scope(c), c);
  free_c_parser_context(c);
  (void) stack_pop(ContextStack);
  if(!stack_empty_p(ContextStack)) {
    c_parser_context oc = (c_parser_context) stack_head(ContextStack);
    //pips_assert("ycontext is consistant with stack_head(ContextStack)",
    //          ycontext==stack_head(ContextStack));
    pips_debug(8, "Back to context scope \"\%s\" in context %p\n",
               c_parser_context_scope(oc), oc);
  }
  else {
    // ycontext = c_parser_context_undefined;
    pips_debug(8, "Back to undefined context scope\n");
  }
}
 
void PushContext(c_parser_context c)
{
  stack_push((char *) c, ContextStack);
  pips_debug(8, "Context %p with scope \"%s\" is put in stack position %d\n",
             c, c_parser_context_scope(c), stack_size(ContextStack));
}
 
void PopContext()
{
  c_parser_context fc = (c_parser_context) stack_head(ContextStack);
 
  pips_debug(8, "Context %p with scope \"%s\" is popped from stack position %d\n",
             fc, c_parser_context_scope(fc), stack_size(ContextStack));
  (void)stack_pop(ContextStack);
  if(stack_empty_p(ContextStack)) {
    pips_debug(8, "context stack is now empty\n");
  }
  else {
    c_parser_context h = (c_parser_context) stack_head(ContextStack);
    pips_debug(8, "Context %p with scope \"%s\" is top of stack at position %d\n",
               h, c_parser_context_scope(h), stack_size(ContextStack));
  }
}
 
c_parser_context GetContext()
{
 
    c_parser_context c = c_parser_context_undefined;
 
    if(!stack_empty_p(ContextStack))
      c = (c_parser_context) stack_head(ContextStack);
    else
      // Should we return a default context?
      // Not really compatible with a clean memory allocation policy
      pips_internal_error("No current context");
 
  pips_debug(8, "Context %p is obtained from stack position %d\n",
             c, stack_size(ContextStack));
 
  return c;
}
 
c_parser_context GetContextCopy()
{
  c_parser_context c = (c_parser_context) stack_head(ContextStack);
  c_parser_context cc = copy_c_parser_context(c);
  pips_debug(8, "Context copy %p with scope \"%s\" is obtained from context %p with scope \"%s\" at stack position %d\n",
             cc, c_parser_context_scope(cc),
             c, c_parser_context_scope(c),
             stack_size(ContextStack));
  return cc;
}
/* Declaration counter 
 *
 * It is used to declare the formal parameters in function declarations.
 */
 static int declaration_counter = 0;
 
 void reset_declaration_counter()
 {
   declaration_counter = 0;
 }
 
 int get_declaration_counter()
 {
   return declaration_counter;
 }
␌
 /* Each scope in the current unit has its own number.
  *
  * The scope management in the C parser is the same as in the C preprocessor.
  *
  * The scope numbers defined here are used by the C parser lexical
  * analyzer to disambiguate between named types and variables, but
  * different scopes are defined for the internal representation.
 */
#define SCOPE_UNDEFINED (-1)
 static int c_parser_scope_number = SCOPE_UNDEFINED;
 static stack c_parser_scope_stack = stack_undefined;
 
 void init_c_parser_scope_stack()
 {
   c_parser_scope_number = 0;
   pips_assert("The stack is undefined",
               stack_undefined_p(c_parser_scope_stack));
   c_parser_scope_stack = stack_make(string_domain, 0, 0);
 }
 
 void reset_c_parser_scope_stack()
 {
   if(c_parser_scope_stack != stack_undefined) {
     if(stack_empty_p(c_parser_scope_stack)) {
       stack_free(&c_parser_scope_stack);
       c_parser_scope_stack = stack_undefined;
     }
     else {
       // pips_internal_error? Could be a bad input C file...
       pips_user_warning("Parser scope stack is not empty.\n");
     }
   }
   c_parser_scope_number = SCOPE_UNDEFINED;
   return;
 }
 
 /* To be used by an error handler */
 void force_reset_c_parser_scope_stack()
 {
   if(c_parser_scope_stack != stack_undefined) {
       stack_free(&c_parser_scope_stack);
       c_parser_scope_stack = stack_undefined;
   }
   c_parser_scope_number = SCOPE_UNDEFINED;
   return;
 }
 
 void push_new_c_parser_scope()
 {
   c_parser_scope_number++;
   string sn = string_undefined;
   (void) asprintf(&sn, "%d", c_parser_scope_number);
   stack_push((void *) sn, c_parser_scope_stack);
   return;
 }
 
 void pop_c_parser_scope_stack()
 {
   stack_pop(c_parser_scope_stack);
   return;
 }
 
bool c_parser_scope_stack_empty_p()
{
  return stack_empty_p(c_parser_scope_stack);
}
 
string get_c_parser_current_scope()
 {
   string sn = string_undefined;
   if(c_parser_scope_stack_empty_p()) {
     // We are at the global level: no scope has been entered yet
     sn = "";
   }
   else
     sn = (string) stack_head(c_parser_scope_stack);
   return sn;
 }
 
string get_c_parser_nth_scope(int n)
 {
   string sn = (string) stack_nth(c_parser_scope_stack, n);
   return sn;
 }
 
int c_parser_number_of_scopes()
 {
   int n = stack_size(c_parser_scope_stack);
   return n;
 }
␌
/* When struct and union declarations are nested, the rules cannot
   return information about the internal declarations because they
   must return type information. Hence internal declarations must be
   recorded and re-used when the final continue/declaration statement
   is generated. In order not to confuse the prettyprinter, they must
   appear first in the declaration list, that is in the innermost to
   outermost order. */
 
static list internal_derived_entity_declarations = NIL;
 
static void RecordDerivedEntityDeclaration(entity de)
{
  internal_derived_entity_declarations
    = gen_nconc(internal_derived_entity_declarations,
                CONS(ENTITY, de, NIL));
}
 
static list GetDerivedEntityDeclarations()
{
  list l = internal_derived_entity_declarations;
  /* The list spine is going to be reused by the caller. No need to
     free. */
  internal_derived_entity_declarations = NIL;
  return l;
}
 
static void ResetDerivedEntityDeclarations()
{
  if(!ENDP(internal_derived_entity_declarations)) {
    gen_free_list(internal_derived_entity_declarations);
    internal_derived_entity_declarations = NIL;
  }
}
 
#line 628 "cyacc.tab.c"
 
# ifndef YY_CAST
#  ifdef __cplusplus
#   define YY_CAST(Type, Val) static_cast<Type> (Val)
#   define YY_REINTERPRET_CAST(Type, Val) reinterpret_cast<Type> (Val)
#  else
#   define YY_CAST(Type, Val) ((Type) (Val))
#   define YY_REINTERPRET_CAST(Type, Val) ((Type) (Val))
#  endif
# endif
# ifndef YY_NULLPTR
#  if defined __cplusplus
#   if 201103L <= __cplusplus
#    define YY_NULLPTR nullptr
#   else
#    define YY_NULLPTR 0
#   endif
#  else
#   define YY_NULLPTR ((void*)0)
#  endif
# endif
 
#include "cyacc.tab.h"
/* Symbol kind.  */
enum yysymbol_kind_t
{
  YYSYMBOL_YYEMPTY = -2,
  YYSYMBOL_YYEOF = 0,                      /* "end of file"  */
  YYSYMBOL_YYerror = 1,                    /* error  */
  YYSYMBOL_YYUNDEF = 2,                    /* "invalid token"  */
  YYSYMBOL_TK_IDENT = 3,                   /* TK_IDENT  */
  YYSYMBOL_TK_CHARCON = 4,                 /* TK_CHARCON  */
  YYSYMBOL_TK_INTCON = 5,                  /* TK_INTCON  */
  YYSYMBOL_TK_FLOATCON = 6,                /* TK_FLOATCON  */
  YYSYMBOL_TK_NAMED_TYPE = 7,              /* TK_NAMED_TYPE  */
  YYSYMBOL_TK_STRINGCON = 8,               /* TK_STRINGCON  */
  YYSYMBOL_TK_WSTRINGCON = 9,              /* TK_WSTRINGCON  */
  YYSYMBOL_TK_EOF = 10,                    /* TK_EOF  */
  YYSYMBOL_TK_CHAR = 11,                   /* TK_CHAR  */
  YYSYMBOL_TK_INT = 12,                    /* TK_INT  */
  YYSYMBOL_TK_INT128 = 13,                 /* TK_INT128  */
  YYSYMBOL_TK_UINT128 = 14,                /* TK_UINT128  */
  YYSYMBOL_TK_DOUBLE = 15,                 /* TK_DOUBLE  */
  YYSYMBOL_TK_FLOAT = 16,                  /* TK_FLOAT  */
  YYSYMBOL_TK_VOID = 17,                   /* TK_VOID  */
  YYSYMBOL_TK_COMPLEX = 18,                /* TK_COMPLEX  */
  YYSYMBOL_TK_ENUM = 19,                   /* TK_ENUM  */
  YYSYMBOL_TK_STRUCT = 20,                 /* TK_STRUCT  */
  YYSYMBOL_TK_TYPEDEF = 21,                /* TK_TYPEDEF  */
  YYSYMBOL_TK_UNION = 22,                  /* TK_UNION  */
  YYSYMBOL_TK_SIGNED = 23,                 /* TK_SIGNED  */
  YYSYMBOL_TK_UNSIGNED = 24,               /* TK_UNSIGNED  */
  YYSYMBOL_TK_LONG = 25,                   /* TK_LONG  */
  YYSYMBOL_TK_SHORT = 26,                  /* TK_SHORT  */
  YYSYMBOL_TK_VOLATILE = 27,               /* TK_VOLATILE  */
  YYSYMBOL_TK_EXTERN = 28,                 /* TK_EXTERN  */
  YYSYMBOL_TK_STATIC = 29,                 /* TK_STATIC  */
  YYSYMBOL_TK_STATIC_DIMENSION = 30,       /* TK_STATIC_DIMENSION  */
  YYSYMBOL_TK_CONST = 31,                  /* TK_CONST  */
  YYSYMBOL_TK_RESTRICT = 32,               /* TK_RESTRICT  */
  YYSYMBOL_TK_AUTO = 33,                   /* TK_AUTO  */
  YYSYMBOL_TK_REGISTER = 34,               /* TK_REGISTER  */
  YYSYMBOL_TK_THREAD = 35,                 /* TK_THREAD  */
  YYSYMBOL_TK_SIZEOF = 36,                 /* TK_SIZEOF  */
  YYSYMBOL_TK_ALIGNOF = 37,                /* TK_ALIGNOF  */
  YYSYMBOL_TK_EQ = 38,                     /* TK_EQ  */
  YYSYMBOL_TK_PLUS_EQ = 39,                /* TK_PLUS_EQ  */
  YYSYMBOL_TK_MINUS_EQ = 40,               /* TK_MINUS_EQ  */
  YYSYMBOL_TK_STAR_EQ = 41,                /* TK_STAR_EQ  */
  YYSYMBOL_TK_SLASH_EQ = 42,               /* TK_SLASH_EQ  */
  YYSYMBOL_TK_PERCENT_EQ = 43,             /* TK_PERCENT_EQ  */
  YYSYMBOL_TK_AND_EQ = 44,                 /* TK_AND_EQ  */
  YYSYMBOL_TK_PIPE_EQ = 45,                /* TK_PIPE_EQ  */
  YYSYMBOL_TK_CIRC_EQ = 46,                /* TK_CIRC_EQ  */
  YYSYMBOL_TK_INF_INF_EQ = 47,             /* TK_INF_INF_EQ  */
  YYSYMBOL_TK_SUP_SUP_EQ = 48,             /* TK_SUP_SUP_EQ  */
  YYSYMBOL_TK_ARROW = 49,                  /* TK_ARROW  */
  YYSYMBOL_TK_DOT = 50,                    /* TK_DOT  */
  YYSYMBOL_TK_EQ_EQ = 51,                  /* TK_EQ_EQ  */
  YYSYMBOL_TK_EXCLAM_EQ = 52,              /* TK_EXCLAM_EQ  */
  YYSYMBOL_TK_INF = 53,                    /* TK_INF  */
  YYSYMBOL_TK_SUP = 54,                    /* TK_SUP  */
  YYSYMBOL_TK_INF_EQ = 55,                 /* TK_INF_EQ  */
  YYSYMBOL_TK_SUP_EQ = 56,                 /* TK_SUP_EQ  */
  YYSYMBOL_TK_PLUS = 57,                   /* TK_PLUS  */
  YYSYMBOL_TK_MINUS = 58,                  /* TK_MINUS  */
  YYSYMBOL_TK_STAR = 59,                   /* TK_STAR  */
  YYSYMBOL_TK_SLASH = 60,                  /* TK_SLASH  */
  YYSYMBOL_TK_PERCENT = 61,                /* TK_PERCENT  */
  YYSYMBOL_TK_TILDE = 62,                  /* TK_TILDE  */
  YYSYMBOL_TK_AND = 63,                    /* TK_AND  */
  YYSYMBOL_TK_PIPE = 64,                   /* TK_PIPE  */
  YYSYMBOL_TK_CIRC = 65,                   /* TK_CIRC  */
  YYSYMBOL_TK_EXCLAM = 66,                 /* TK_EXCLAM  */
  YYSYMBOL_TK_AND_AND = 67,                /* TK_AND_AND  */
  YYSYMBOL_TK_PIPE_PIPE = 68,              /* TK_PIPE_PIPE  */
  YYSYMBOL_TK_INF_INF = 69,                /* TK_INF_INF  */
  YYSYMBOL_TK_SUP_SUP = 70,                /* TK_SUP_SUP  */
  YYSYMBOL_TK_PLUS_PLUS = 71,              /* TK_PLUS_PLUS  */
  YYSYMBOL_TK_MINUS_MINUS = 72,            /* TK_MINUS_MINUS  */
  YYSYMBOL_TK_RPAREN = 73,                 /* TK_RPAREN  */
  YYSYMBOL_TK_LPAREN = 74,                 /* TK_LPAREN  */
  YYSYMBOL_TK_RBRACE = 75,                 /* TK_RBRACE  */
  YYSYMBOL_TK_LBRACE = 76,                 /* TK_LBRACE  */
  YYSYMBOL_TK_LBRACKET = 77,               /* TK_LBRACKET  */
  YYSYMBOL_TK_RBRACKET = 78,               /* TK_RBRACKET  */
  YYSYMBOL_TK_COLON = 79,                  /* TK_COLON  */
  YYSYMBOL_TK_SEMICOLON = 80,              /* TK_SEMICOLON  */
  YYSYMBOL_TK_COMMA = 81,                  /* TK_COMMA  */
  YYSYMBOL_TK_ELLIPSIS = 82,               /* TK_ELLIPSIS  */
  YYSYMBOL_TK_QUEST = 83,                  /* TK_QUEST  */
  YYSYMBOL_TK_BREAK = 84,                  /* TK_BREAK  */
  YYSYMBOL_TK_CONTINUE = 85,               /* TK_CONTINUE  */
  YYSYMBOL_TK_GOTO = 86,                   /* TK_GOTO  */
  YYSYMBOL_TK_RETURN = 87,                 /* TK_RETURN  */
  YYSYMBOL_TK_SWITCH = 88,                 /* TK_SWITCH  */
  YYSYMBOL_TK_CASE = 89,                   /* TK_CASE  */
  YYSYMBOL_TK_DEFAULT = 90,                /* TK_DEFAULT  */
  YYSYMBOL_TK_WHILE = 91,                  /* TK_WHILE  */
  YYSYMBOL_TK_DO = 92,                     /* TK_DO  */
  YYSYMBOL_TK_FOR = 93,                    /* TK_FOR  */
  YYSYMBOL_TK_IF = 94,                     /* TK_IF  */
  YYSYMBOL_TK_ELSE = 95,                   /* TK_ELSE  */
  YYSYMBOL_TK_ATTRIBUTE = 96,              /* TK_ATTRIBUTE  */
  YYSYMBOL_TK_INLINE = 97,                 /* TK_INLINE  */
  YYSYMBOL_TK_ASM = 98,                    /* TK_ASM  */
  YYSYMBOL_TK_TYPEOF = 99,                 /* TK_TYPEOF  */
  YYSYMBOL_TK_FUNCTION__ = 100,            /* TK_FUNCTION__  */
  YYSYMBOL_TK_PRETTY_FUNCTION__ = 101,     /* TK_PRETTY_FUNCTION__  */
  YYSYMBOL_TK_LABEL__ = 102,               /* TK_LABEL__  */
  YYSYMBOL_TK_BUILTIN_VA_ARG = 103,        /* TK_BUILTIN_VA_ARG  */
  YYSYMBOL_TK_BUILTIN_VA_LIST = 104,       /* TK_BUILTIN_VA_LIST  */
  YYSYMBOL_TK_BLOCKATTRIBUTE = 105,        /* TK_BLOCKATTRIBUTE  */
  YYSYMBOL_TK_DECLSPEC = 106,              /* TK_DECLSPEC  */
  YYSYMBOL_TK_MSASM = 107,                 /* TK_MSASM  */
  YYSYMBOL_TK_MSATTR = 108,                /* TK_MSATTR  */
  YYSYMBOL_TK_PRAGMA = 109,                /* TK_PRAGMA  */
  YYSYMBOL_TK__Pragma = 110,               /* TK__Pragma  */
  YYSYMBOL_TK_AT_TRANSFORM = 111,          /* TK_AT_TRANSFORM  */
  YYSYMBOL_TK_AT_TRANSFORMEXPR = 112,      /* TK_AT_TRANSFORMEXPR  */
  YYSYMBOL_TK_AT_SPECIFIER = 113,          /* TK_AT_SPECIFIER  */
  YYSYMBOL_TK_AT_EXPR = 114,               /* TK_AT_EXPR  */
  YYSYMBOL_TK_AT_NAME = 115,               /* TK_AT_NAME  */
  YYSYMBOL_TK_COMPLEXCON = 116,            /* TK_COMPLEXCON  */
  YYSYMBOL_TK_CAST = 117,                  /* TK_CAST  */
  YYSYMBOL_TK_ADDROF = 118,                /* TK_ADDROF  */
  YYSYMBOL_YYACCEPT = 119,                 /* $accept  */
  YYSYMBOL_interpret = 120,                /* interpret  */
  YYSYMBOL_file = 121,                     /* file  */
  YYSYMBOL_globals = 122,                  /* globals  */
  YYSYMBOL_123_1 = 123,                    /* $@1  */
  YYSYMBOL_location = 124,                 /* location  */
  YYSYMBOL_global = 125,                   /* global  */
  YYSYMBOL_126_2 = 126,                    /* $@2  */
  YYSYMBOL_id_or_typename = 127,           /* id_or_typename  */
  YYSYMBOL_maybecomma = 128,               /* maybecomma  */
  YYSYMBOL_expression = 129,               /* expression  */
  YYSYMBOL_constant = 130,                 /* constant  */
  YYSYMBOL_string_constant = 131,          /* string_constant  */
  YYSYMBOL_one_string_constant = 132,      /* one_string_constant  */
  YYSYMBOL_string_list = 133,              /* string_list  */
  YYSYMBOL_wstring_list = 134,             /* wstring_list  */
  YYSYMBOL_one_string = 135,               /* one_string  */
  YYSYMBOL_init_expression = 136,          /* init_expression  */
  YYSYMBOL_initializer_list = 137,         /* initializer_list  */
  YYSYMBOL_initializer_list_opt = 138,     /* initializer_list_opt  */
  YYSYMBOL_initializer = 139,              /* initializer  */
  YYSYMBOL_eq_opt = 140,                   /* eq_opt  */
  YYSYMBOL_init_designators = 141,         /* init_designators  */
  YYSYMBOL_init_designators_opt = 142,     /* init_designators_opt  */
  YYSYMBOL_gcc_init_designators = 143,     /* gcc_init_designators  */
  YYSYMBOL_arguments = 144,                /* arguments  */
  YYSYMBOL_opt_expression = 145,           /* opt_expression  */
  YYSYMBOL_comma_expression = 146,         /* comma_expression  */
  YYSYMBOL_comma_expression_opt = 147,     /* comma_expression_opt  */
  YYSYMBOL_statement_paren_comma_expression = 148, /* statement_paren_comma_expression  */
  YYSYMBOL_paren_comma_expression = 149,   /* paren_comma_expression  */
  YYSYMBOL_bracket_comma_expression = 150, /* bracket_comma_expression  */
  YYSYMBOL_statements_inside_block = 151,  /* statements_inside_block  */
  YYSYMBOL_152_3 = 152,                    /* $@3  */
  YYSYMBOL_block = 153,                    /* block  */
  YYSYMBOL_block_attrs = 154,              /* block_attrs  */
  YYSYMBOL_statement_list = 155,           /* statement_list  */
  YYSYMBOL_local_labels = 156,             /* local_labels  */
  YYSYMBOL_local_label_names = 157,        /* local_label_names  */
  YYSYMBOL_label = 158,                    /* label  */
  YYSYMBOL_pragma = 159,                   /* pragma  */
  YYSYMBOL_pragmas = 160,                  /* pragmas  */
  YYSYMBOL_statement = 161,                /* statement  */
  YYSYMBOL_statement_without_pragma = 162, /* statement_without_pragma  */
  YYSYMBOL_163_4 = 163,                    /* $@4  */
  YYSYMBOL_164_5 = 164,                    /* $@5  */
  YYSYMBOL_165_6 = 165,                    /* $@6  */
  YYSYMBOL_166_7 = 166,                    /* $@7  */
  YYSYMBOL_167_8 = 167,                    /* $@8  */
  YYSYMBOL_168_9 = 168,                    /* $@9  */
  YYSYMBOL_169_10 = 169,                   /* $@10  */
  YYSYMBOL_for_clause = 170,               /* for_clause  */
  YYSYMBOL_171_11 = 171,                   /* $@11  */
  YYSYMBOL_declaration = 172,              /* declaration  */
  YYSYMBOL_init_declarator_list = 173,     /* init_declarator_list  */
  YYSYMBOL_init_declarator = 174,          /* init_declarator  */
  YYSYMBOL_decl_spec_list = 175,           /* decl_spec_list  */
  YYSYMBOL_176_12 = 176,                   /* $@12  */
  YYSYMBOL_my_decl_spec_list = 177,        /* my_decl_spec_list  */
  YYSYMBOL_decl_spec_list_opt = 178,       /* decl_spec_list_opt  */
  YYSYMBOL_decl_spec_list_opt_no_named = 179, /* decl_spec_list_opt_no_named  */
  YYSYMBOL_type_spec = 180,                /* type_spec  */
  YYSYMBOL_181_13 = 181,                   /* $@13  */
  YYSYMBOL_182_14 = 182,                   /* $@14  */
  YYSYMBOL_183_15 = 183,                   /* $@15  */
  YYSYMBOL_184_16 = 184,                   /* $@16  */
  YYSYMBOL_struct_decl_list = 185,         /* struct_decl_list  */
  YYSYMBOL_186_17 = 186,                   /* $@17  */
  YYSYMBOL_field_decl_list = 187,          /* field_decl_list  */
  YYSYMBOL_field_decl = 188,               /* field_decl  */
  YYSYMBOL_enum_list = 189,                /* enum_list  */
  YYSYMBOL_enumerator = 190,               /* enumerator  */
  YYSYMBOL_declarator = 191,               /* declarator  */
  YYSYMBOL_direct_decl = 192,              /* direct_decl  */
  YYSYMBOL_193_18 = 193,                   /* $@18  */
  YYSYMBOL_parameter_list_startscope = 194, /* parameter_list_startscope  */
  YYSYMBOL_rest_par_list = 195,            /* rest_par_list  */
  YYSYMBOL_rest_par_list1 = 196,           /* rest_par_list1  */
  YYSYMBOL_197_19 = 197,                   /* $@19  */
  YYSYMBOL_198_20 = 198,                   /* $@20  */
  YYSYMBOL_parameter_decl = 199,           /* parameter_decl  */
  YYSYMBOL_old_proto_decl = 200,           /* old_proto_decl  */
  YYSYMBOL_direct_old_proto_decl = 201,    /* direct_old_proto_decl  */
  YYSYMBOL_202_21 = 202,                   /* $@21  */
  YYSYMBOL_old_parameter_list_ne = 203,    /* old_parameter_list_ne  */
  YYSYMBOL_old_pardef_list = 204,          /* old_pardef_list  */
  YYSYMBOL_old_pardef = 205,               /* old_pardef  */
  YYSYMBOL_pointer = 206,                  /* pointer  */
  YYSYMBOL_pointer_opt = 207,              /* pointer_opt  */
  YYSYMBOL_type_name = 208,                /* type_name  */
  YYSYMBOL_abstract_decl = 209,            /* abstract_decl  */
  YYSYMBOL_abs_direct_decl = 210,          /* abs_direct_decl  */
  YYSYMBOL_211_22 = 211,                   /* $@22  */
  YYSYMBOL_abs_direct_decl_opt = 212,      /* abs_direct_decl_opt  */
  YYSYMBOL_function_def = 213,             /* function_def  */
  YYSYMBOL_214_23 = 214,                   /* $@23  */
  YYSYMBOL_function_def_start = 215,       /* function_def_start  */
  YYSYMBOL_216_24 = 216,                   /* $@24  */
  YYSYMBOL_217_25 = 217,                   /* $@25  */
  YYSYMBOL_attributes = 218,               /* attributes  */
  YYSYMBOL_attributes_with_asm = 219,      /* attributes_with_asm  */
  YYSYMBOL_attribute = 220,                /* attribute  */
  YYSYMBOL_asmattr = 221,                  /* asmattr  */
  YYSYMBOL_asmoutputs = 222,               /* asmoutputs  */
  YYSYMBOL_asmoperands = 223,              /* asmoperands  */
  YYSYMBOL_asmoperandsne = 224,            /* asmoperandsne  */
  YYSYMBOL_asmoperand = 225,               /* asmoperand  */
  YYSYMBOL_asminputs = 226,                /* asminputs  */
  YYSYMBOL_asmclobber = 227,               /* asmclobber  */
  YYSYMBOL_asmcloberlst_ne = 228           /* asmcloberlst_ne  */
};
typedef enum yysymbol_kind_t yysymbol_kind_t;
 
 
 
 
#ifdef short
# undef short
#endif
 
/* On compilers that do not define __PTRDIFF_MAX__ etc., make sure
   <limits.h> and (if available) <stdint.h> are included
   so that the code can choose integer types of a good width.  */
 
#ifndef __PTRDIFF_MAX__
# include <limits.h> /* INFRINGES ON USER NAME SPACE */
# if defined __STDC_VERSION__ && 199901 <= __STDC_VERSION__
#  include <stdint.h> /* INFRINGES ON USER NAME SPACE */
#  define YY_STDINT_H
# endif
#endif
 
/* Narrow types that promote to a signed type and that can represent a
   signed or unsigned integer of at least N bits.  In tables they can
   save space and decrease cache pressure.  Promoting to a signed type
   helps avoid bugs in integer arithmetic.  */
 
#ifdef __INT_LEAST8_MAX__
typedef __INT_LEAST8_TYPE__ yytype_int8;
#elif defined YY_STDINT_H
typedef int_least8_t yytype_int8;
#else
typedef signed char yytype_int8;
#endif
 
#ifdef __INT_LEAST16_MAX__
typedef __INT_LEAST16_TYPE__ yytype_int16;
#elif defined YY_STDINT_H
typedef int_least16_t yytype_int16;
#else
typedef short yytype_int16;
#endif
 
/* Work around bug in HP-UX 11.23, which defines these macros
   incorrectly for preprocessor constants.  This workaround can likely
   be removed in 2023, as HPE has promised support for HP-UX 11.23
   (aka HP-UX 11i v2) only through the end of 2022; see Table 2 of
   <https://h20195.www2.hpe.com/V2/getpdf.aspx/4AA4-7673ENW.pdf>.  */
#ifdef __hpux
# undef UINT_LEAST8_MAX
# undef UINT_LEAST16_MAX
# define UINT_LEAST8_MAX 255
# define UINT_LEAST16_MAX 65535
#endif
 
#if defined __UINT_LEAST8_MAX__ && __UINT_LEAST8_MAX__ <= __INT_MAX__
typedef __UINT_LEAST8_TYPE__ yytype_uint8;
#elif (!defined __UINT_LEAST8_MAX__ && defined YY_STDINT_H \
       && UINT_LEAST8_MAX <= INT_MAX)
typedef uint_least8_t yytype_uint8;
#elif !defined __UINT_LEAST8_MAX__ && UCHAR_MAX <= INT_MAX
typedef unsigned char yytype_uint8;
#else
typedef short yytype_uint8;
#endif
 
#if defined __UINT_LEAST16_MAX__ && __UINT_LEAST16_MAX__ <= __INT_MAX__
typedef __UINT_LEAST16_TYPE__ yytype_uint16;
#elif (!defined __UINT_LEAST16_MAX__ && defined YY_STDINT_H \
       && UINT_LEAST16_MAX <= INT_MAX)
typedef uint_least16_t yytype_uint16;
#elif !defined __UINT_LEAST16_MAX__ && USHRT_MAX <= INT_MAX
typedef unsigned short yytype_uint16;
#else
typedef int yytype_uint16;
#endif
 
#ifndef YYPTRDIFF_T
# if defined __PTRDIFF_TYPE__ && defined __PTRDIFF_MAX__
#  define YYPTRDIFF_T __PTRDIFF_TYPE__
#  define YYPTRDIFF_MAXIMUM __PTRDIFF_MAX__
# elif defined PTRDIFF_MAX
#  ifndef ptrdiff_t
#   include <stddef.h> /* INFRINGES ON USER NAME SPACE */
#  endif
#  define YYPTRDIFF_T ptrdiff_t
#  define YYPTRDIFF_MAXIMUM PTRDIFF_MAX
# else
#  define YYPTRDIFF_T long
#  define YYPTRDIFF_MAXIMUM LONG_MAX
# endif
#endif
 
#ifndef YYSIZE_T
# ifdef __SIZE_TYPE__
#  define YYSIZE_T __SIZE_TYPE__
# elif defined size_t
#  define YYSIZE_T size_t
# elif defined __STDC_VERSION__ && 199901 <= __STDC_VERSION__
#  include <stddef.h> /* INFRINGES ON USER NAME SPACE */
#  define YYSIZE_T size_t
# else
#  define YYSIZE_T unsigned
# endif
#endif
 
#define YYSIZE_MAXIMUM                                  \
  YY_CAST (YYPTRDIFF_T,                                 \
           (YYPTRDIFF_MAXIMUM < YY_CAST (YYSIZE_T, -1)  \
            ? YYPTRDIFF_MAXIMUM                         \
            : YY_CAST (YYSIZE_T, -1)))
 
#define YYSIZEOF(X) YY_CAST (YYPTRDIFF_T, sizeof (X))
 
 
/* Stored state numbers (used for stacks). */
typedef yytype_int16 yy_state_t;
 
/* State numbers in computations.  */
typedef int yy_state_fast_t;
 
#ifndef YY_
# if defined YYENABLE_NLS && YYENABLE_NLS
#  if ENABLE_NLS
#   include <libintl.h> /* INFRINGES ON USER NAME SPACE */
#   define YY_(Msgid) dgettext ("bison-runtime", Msgid)
#  endif
# endif
# ifndef YY_
#  define YY_(Msgid) Msgid
# endif
#endif
 
 
#ifndef YY_ATTRIBUTE_PURE
# if defined __GNUC__ && 2 < __GNUC__ + (96 <= __GNUC_MINOR__)
#  define YY_ATTRIBUTE_PURE __attribute__ ((__pure__))
# else
#  define YY_ATTRIBUTE_PURE
# endif
#endif
 
#ifndef YY_ATTRIBUTE_UNUSED
# if defined __GNUC__ && 2 < __GNUC__ + (7 <= __GNUC_MINOR__)
#  define YY_ATTRIBUTE_UNUSED __attribute__ ((__unused__))
# else
#  define YY_ATTRIBUTE_UNUSED
# endif
#endif
 
/* Suppress unused-variable warnings by "using" E.  */
#if ! defined lint || defined __GNUC__
# define YY_USE(E) ((void) (E))
#else
# define YY_USE(E) /* empty */
#endif
 
/* Suppress an incorrect diagnostic about yylval being uninitialized.  */
#if defined __GNUC__ && ! defined __ICC && 406 <= __GNUC__ * 100 + __GNUC_MINOR__
# if __GNUC__ * 100 + __GNUC_MINOR__ < 407
#  define YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN                           \
    _Pragma ("GCC diagnostic push")                                     \
    _Pragma ("GCC diagnostic ignored \"-Wuninitialized\"")
# else
#  define YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN                           \
    _Pragma ("GCC diagnostic push")                                     \
    _Pragma ("GCC diagnostic ignored \"-Wuninitialized\"")              \
    _Pragma ("GCC diagnostic ignored \"-Wmaybe-uninitialized\"")
# endif
# define YY_IGNORE_MAYBE_UNINITIALIZED_END      \
    _Pragma ("GCC diagnostic pop")
#else
# define YY_INITIAL_VALUE(Value) Value
#endif
#ifndef YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN
# define YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN
# define YY_IGNORE_MAYBE_UNINITIALIZED_END
#endif
#ifndef YY_INITIAL_VALUE
# define YY_INITIAL_VALUE(Value) /* Nothing. */
#endif
 
#if defined __cplusplus && defined __GNUC__ && ! defined __ICC && 6 <= __GNUC__
# define YY_IGNORE_USELESS_CAST_BEGIN                          \
    _Pragma ("GCC diagnostic push")                            \
    _Pragma ("GCC diagnostic ignored \"-Wuseless-cast\"")
# define YY_IGNORE_USELESS_CAST_END            \
    _Pragma ("GCC diagnostic pop")
#endif
#ifndef YY_IGNORE_USELESS_CAST_BEGIN
# define YY_IGNORE_USELESS_CAST_BEGIN
# define YY_IGNORE_USELESS_CAST_END
#endif
 
 
#define YY_ASSERT(E) ((void) (0 && (E)))
 
#if !defined yyoverflow
 
/* The parser invokes alloca or malloc; define the necessary symbols.  */
 
# ifdef YYSTACK_USE_ALLOCA
#  if YYSTACK_USE_ALLOCA
#   ifdef __GNUC__
#    define YYSTACK_ALLOC __builtin_alloca
#   elif defined __BUILTIN_VA_ARG_INCR
#    include <alloca.h> /* INFRINGES ON USER NAME SPACE */
#   elif defined _AIX
#    define YYSTACK_ALLOC __alloca
#   elif defined _MSC_VER
#    include <malloc.h> /* INFRINGES ON USER NAME SPACE */
#    define alloca _alloca
#   else
#    define YYSTACK_ALLOC alloca
#    if ! defined _ALLOCA_H && ! defined EXIT_SUCCESS
#     include <stdlib.h> /* INFRINGES ON USER NAME SPACE */
      /* Use EXIT_SUCCESS as a witness for stdlib.h.  */
#     ifndef EXIT_SUCCESS
#      define EXIT_SUCCESS 0
#     endif
#    endif
#   endif
#  endif
# endif
 
# ifdef YYSTACK_ALLOC
   /* Pacify GCC's 'empty if-body' warning.  */
#  define YYSTACK_FREE(Ptr) do { /* empty */; } while (0)
#  ifndef YYSTACK_ALLOC_MAXIMUM
    /* The OS might guarantee only one guard page at the bottom of the stack,
       and a page size can be as small as 4096 bytes.  So we cannot safely
       invoke alloca (N) if N exceeds 4096.  Use a slightly smaller number
       to allow for a few compiler-allocated temporary stack slots.  */
#   define YYSTACK_ALLOC_MAXIMUM 4032 /* reasonable circa 2006 */
#  endif
# else
#  define YYSTACK_ALLOC YYMALLOC
#  define YYSTACK_FREE YYFREE
#  ifndef YYSTACK_ALLOC_MAXIMUM
#   define YYSTACK_ALLOC_MAXIMUM YYSIZE_MAXIMUM
#  endif
#  if (defined __cplusplus && ! defined EXIT_SUCCESS \
       && ! ((defined YYMALLOC || defined malloc) \
             && (defined YYFREE || defined free)))
#   include <stdlib.h> /* INFRINGES ON USER NAME SPACE */
#   ifndef EXIT_SUCCESS
#    define EXIT_SUCCESS 0
#   endif
#  endif
#  ifndef YYMALLOC
#   define YYMALLOC malloc
#   if ! defined malloc && ! defined EXIT_SUCCESS
void *malloc (YYSIZE_T); /* INFRINGES ON USER NAME SPACE */
#   endif
#  endif
#  ifndef YYFREE
#   define YYFREE free
#   if ! defined free && ! defined EXIT_SUCCESS
void free (void *); /* INFRINGES ON USER NAME SPACE */
#   endif
#  endif
# endif
#endif /* !defined yyoverflow */
 
#if (! defined yyoverflow \
     && (! defined __cplusplus \
         || (defined YYSTYPE_IS_TRIVIAL && YYSTYPE_IS_TRIVIAL)))
 
/* A type that is properly aligned for any stack member.  */
union yyalloc
{
  yy_state_t yyss_alloc;
  YYSTYPE yyvs_alloc;
};
 
/* The size of the maximum gap between one aligned stack and the next.  */
# define YYSTACK_GAP_MAXIMUM (YYSIZEOF (union yyalloc) - 1)
 
/* The size of an array large to enough to hold all stacks, each with
   N elements.  */
# define YYSTACK_BYTES(N) \
     ((N) * (YYSIZEOF (yy_state_t) + YYSIZEOF (YYSTYPE)) \
      + YYSTACK_GAP_MAXIMUM)
 
# define YYCOPY_NEEDED 1
 
/* Relocate STACK from its old location to the new one.  The
   local variables YYSIZE and YYSTACKSIZE give the old and new number of
   elements in the stack, and YYPTR gives the new location of the
   stack.  Advance YYPTR to a properly aligned location for the next
   stack.  */
# define YYSTACK_RELOCATE(Stack_alloc, Stack)                           \
    do                                                                  \
      {                                                                 \
        YYPTRDIFF_T yynewbytes;                                         \
        YYCOPY (&yyptr->Stack_alloc, Stack, yysize);                    \
        Stack = &yyptr->Stack_alloc;                                    \
        yynewbytes = yystacksize * YYSIZEOF (*Stack) + YYSTACK_GAP_MAXIMUM; \
        yyptr += yynewbytes / YYSIZEOF (*yyptr);                        \
      }                                                                 \
    while (0)
 
#endif
 
#if defined YYCOPY_NEEDED && YYCOPY_NEEDED
/* Copy COUNT objects from SRC to DST.  The source and destination do
   not overlap.  */
# ifndef YYCOPY
#  if defined __GNUC__ && 1 < __GNUC__
#   define YYCOPY(Dst, Src, Count) \
      __builtin_memcpy (Dst, Src, YY_CAST (YYSIZE_T, (Count)) * sizeof (*(Src)))
#  else
#   define YYCOPY(Dst, Src, Count)              \
      do                                        \
        {                                       \
          YYPTRDIFF_T yyi;                      \
          for (yyi = 0; yyi < (Count); yyi++)   \
            (Dst)[yyi] = (Src)[yyi];            \
        }                                       \
      while (0)
#  endif
# endif
#endif /* !YYCOPY_NEEDED */
 
/* YYFINAL -- State number of the termination state.  */
#define YYFINAL  7
/* YYLAST -- Last index in YYTABLE.  */
#define YYLAST   3204
 
/* YYNTOKENS -- Number of terminals.  */
#define YYNTOKENS  119
/* YYNNTS -- Number of nonterminals.  */
#define YYNNTS  110
/* YYNRULES -- Number of rules.  */
#define YYNRULES  324
/* YYNSTATES -- Number of states.  */
#define YYNSTATES  597
 
/* YYMAXUTOK -- Last valid token kind.  */
#define YYMAXUTOK   373
 
 
/* YYTRANSLATE(TOKEN-NUM) -- Symbol number corresponding to TOKEN-NUM
   as returned by yylex, with out-of-bounds checking.  */
#define YYTRANSLATE(YYX)                                \
  (0 <= (YYX) && (YYX) <= YYMAXUTOK                     \
   ? YY_CAST (yysymbol_kind_t, yytranslate[YYX])        \
   : YYSYMBOL_YYUNDEF)
 
/* YYTRANSLATE[TOKEN-NUM] -- Symbol number corresponding to TOKEN-NUM
   as returned by yylex.  */
static const yytype_int8 yytranslate[] =
{
       0,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     1,     2,     3,     4,
       5,     6,     7,     8,     9,    10,    11,    12,    13,    14,
      15,    16,    17,    18,    19,    20,    21,    22,    23,    24,
      25,    26,    27,    28,    29,    30,    31,    32,    33,    34,
      35,    36,    37,    38,    39,    40,    41,    42,    43,    44,
      45,    46,    47,    48,    49,    50,    51,    52,    53,    54,
      55,    56,    57,    58,    59,    60,    61,    62,    63,    64,
      65,    66,    67,    68,    69,    70,    71,    72,    73,    74,
      75,    76,    77,    78,    79,    80,    81,    82,    83,    84,
      85,    86,    87,    88,    89,    90,    91,    92,    93,    94,
      95,    96,    97,    98,    99,   100,   101,   102,   103,   104,
     105,   106,   107,   108,   109,   110,   111,   112,   113,   114,
     115,   116,   117,   118
};
 
#if YYDEBUG
/* YYRLINE[YYN] -- Source line where rule number YYN was defined.  */
static const yytype_int16 yyrline[] =
{
       0,   775,   775,   777,   815,   816,   816,   901,   915,   919,
     920,   921,   926,   940,   939,  1006,  1012,  1017,  1025,  1027,
    1029,  1035,  1037,  1043,  1047,  1053,  1057,  1061,  1065,  1069,
    1073,  1077,  1081,  1085,  1089,  1093,  1097,  1101,  1105,  1109,
    1116,  1121,  1125,  1152,  1156,  1171,  1175,  1179,  1183,  1187,
    1191,  1195,  1199,  1203,  1207,  1211,  1215,  1219,  1223,  1227,
    1231,  1235,  1239,  1243,  1247,  1251,  1270,  1275,  1280,  1285,
    1290,  1295,  1300,  1305,  1310,  1315,  1320,  1325,  1330,  1334,
    1341,  1346,  1351,  1358,  1363,  1371,  1381,  1390,  1394,  1398,
    1405,  1409,  1413,  1421,  1422,  1424,  1429,  1438,  1445,  1449,
    1455,  1456,  1459,  1463,  1467,  1470,  1474,  1479,  1481,  1483,
    1487,  1488,  1492,  1499,  1500,  1505,  1507,  1512,  1518,  1524,
    1531,  1532,  1536,  1543,  1549,  1557,  1564,  1568,  1578,  1577,
    1593,  1598,  1604,  1611,  1612,  1618,  1623,  1627,  1628,  1633,
    1634,  1638,  1648,  1656,  1664,  1668,  1676,  1686,  1694,  1707,
    1728,  1729,  1751,  1761,  1771,  1777,  1770,  1793,  1792,  1808,
    1807,  1826,  1820,  1837,  1848,  1836,  1858,  1869,  1873,  1877,
    1881,  1909,  1962,  1966,  1970,  1975,  1979,  1997,  1999,  2008,
    2007,  2037,  2088,  2114,  2119,  2126,  2135,  2157,  2157,  2219,
    2228,  2250,  2257,  2265,  2273,  2282,  2335,  2341,  2353,  2363,
    2368,  2377,  2396,  2402,  2407,  2413,  2419,  2429,  2439,  2449,
    2472,  2477,  2483,  2510,  2529,  2547,  2582,  2581,  2618,  2617,
    2644,  2671,  2670,  2693,  2692,  2721,  2761,  2776,  2789,  2812,
    2816,  2825,  2826,  2857,  2856,  2899,  2906,  2911,  2919,  2951,
    2965,  2987,  2993,  2999,  3006,  3031,  3084,  3114,  3181,  3194,
    3210,  3215,  3214,  3280,  3288,  3289,  3295,  3297,  3296,  3314,
    3313,  3324,  3335,  3347,  3357,  3363,  3373,  3372,  3403,  3407,
    3414,  3415,  3424,  3445,  3449,  3453,  3460,  3474,  3475,  3479,
    3493,  3503,  3510,  3538,  3546,  3551,  3557,  3556,  3576,  3578,
    3597,  3596,  3615,  3627,  3640,  3639,  3672,  3671,  3715,  3716,
    3725,  3726,  3728,  3740,  3743,  3747,  3751,  3755,  3871,  3872,
    3874,  3880,  3881,  3886,  3887,  3891,  3893,  3897,  3899,  3904,
    3905,  3910,  3911,  3915,  3917
};
#endif
 
/** Accessing symbol of state STATE.  */
#define YY_ACCESSING_SYMBOL(State) YY_CAST (yysymbol_kind_t, yystos[State])
 
#if YYDEBUG || 0
/* The user-facing name of the symbol whose (internal) number is
   YYSYMBOL.  No bounds checking.  */
static const char *yysymbol_name (yysymbol_kind_t yysymbol) YY_ATTRIBUTE_UNUSED;
 
/* YYTNAME[SYMBOL-NUM] -- String name of the symbol SYMBOL-NUM.
   First, the terminals, then, starting at YYNTOKENS, nonterminals.  */
static const char *const yytname[] =
{
  "\"end of file\"", "error", "\"invalid token\"", "TK_IDENT",
  "TK_CHARCON", "TK_INTCON", "TK_FLOATCON", "TK_NAMED_TYPE",
  "TK_STRINGCON", "TK_WSTRINGCON", "TK_EOF", "TK_CHAR", "TK_INT",
  "TK_INT128", "TK_UINT128", "TK_DOUBLE", "TK_FLOAT", "TK_VOID",
  "TK_COMPLEX", "TK_ENUM", "TK_STRUCT", "TK_TYPEDEF", "TK_UNION",
  "TK_SIGNED", "TK_UNSIGNED", "TK_LONG", "TK_SHORT", "TK_VOLATILE",
  "TK_EXTERN", "TK_STATIC", "TK_STATIC_DIMENSION", "TK_CONST",
  "TK_RESTRICT", "TK_AUTO", "TK_REGISTER", "TK_THREAD", "TK_SIZEOF",
  "TK_ALIGNOF", "TK_EQ", "TK_PLUS_EQ", "TK_MINUS_EQ", "TK_STAR_EQ",
  "TK_SLASH_EQ", "TK_PERCENT_EQ", "TK_AND_EQ", "TK_PIPE_EQ", "TK_CIRC_EQ",
  "TK_INF_INF_EQ", "TK_SUP_SUP_EQ", "TK_ARROW", "TK_DOT", "TK_EQ_EQ",
  "TK_EXCLAM_EQ", "TK_INF", "TK_SUP", "TK_INF_EQ", "TK_SUP_EQ", "TK_PLUS",
  "TK_MINUS", "TK_STAR", "TK_SLASH", "TK_PERCENT", "TK_TILDE", "TK_AND",
  "TK_PIPE", "TK_CIRC", "TK_EXCLAM", "TK_AND_AND", "TK_PIPE_PIPE",
  "TK_INF_INF", "TK_SUP_SUP", "TK_PLUS_PLUS", "TK_MINUS_MINUS",
  "TK_RPAREN", "TK_LPAREN", "TK_RBRACE", "TK_LBRACE", "TK_LBRACKET",
  "TK_RBRACKET", "TK_COLON", "TK_SEMICOLON", "TK_COMMA", "TK_ELLIPSIS",
  "TK_QUEST", "TK_BREAK", "TK_CONTINUE", "TK_GOTO", "TK_RETURN",
  "TK_SWITCH", "TK_CASE", "TK_DEFAULT", "TK_WHILE", "TK_DO", "TK_FOR",
  "TK_IF", "TK_ELSE", "TK_ATTRIBUTE", "TK_INLINE", "TK_ASM", "TK_TYPEOF",
  "TK_FUNCTION__", "TK_PRETTY_FUNCTION__", "TK_LABEL__",
  "TK_BUILTIN_VA_ARG", "TK_BUILTIN_VA_LIST", "TK_BLOCKATTRIBUTE",
  "TK_DECLSPEC", "TK_MSASM", "TK_MSATTR", "TK_PRAGMA", "TK__Pragma",
  "TK_AT_TRANSFORM", "TK_AT_TRANSFORMEXPR", "TK_AT_SPECIFIER",
  "TK_AT_EXPR", "TK_AT_NAME", "TK_COMPLEXCON", "TK_CAST", "TK_ADDROF",
  "$accept", "interpret", "file", "globals", "$@1", "location", "global",
  "$@2", "id_or_typename", "maybecomma", "expression", "constant",
  "string_constant", "one_string_constant", "string_list", "wstring_list",
  "one_string", "init_expression", "initializer_list",
  "initializer_list_opt", "initializer", "eq_opt", "init_designators",
  "init_designators_opt", "gcc_init_designators", "arguments",
  "opt_expression", "comma_expression", "comma_expression_opt",
  "statement_paren_comma_expression", "paren_comma_expression",
  "bracket_comma_expression", "statements_inside_block", "$@3", "block",
  "block_attrs", "statement_list", "local_labels", "local_label_names",
  "label", "pragma", "pragmas", "statement", "statement_without_pragma",
  "$@4", "$@5", "$@6", "$@7", "$@8", "$@9", "$@10", "for_clause", "$@11",
  "declaration", "init_declarator_list", "init_declarator",
  "decl_spec_list", "$@12", "my_decl_spec_list", "decl_spec_list_opt",
  "decl_spec_list_opt_no_named", "type_spec", "$@13", "$@14", "$@15",
  "$@16", "struct_decl_list", "$@17", "field_decl_list", "field_decl",
  "enum_list", "enumerator", "declarator", "direct_decl", "$@18",
  "parameter_list_startscope", "rest_par_list", "rest_par_list1", "$@19",
  "$@20", "parameter_decl", "old_proto_decl", "direct_old_proto_decl",
  "$@21", "old_parameter_list_ne", "old_pardef_list", "old_pardef",
  "pointer", "pointer_opt", "type_name", "abstract_decl",
  "abs_direct_decl", "$@22", "abs_direct_decl_opt", "function_def", "$@23",
  "function_def_start", "$@24", "$@25", "attributes",
  "attributes_with_asm", "attribute", "asmattr", "asmoutputs",
  "asmoperands", "asmoperandsne", "asmoperand", "asminputs", "asmclobber",
  "asmcloberlst_ne", YY_NULLPTR
};
 
static const char *
yysymbol_name (yysymbol_kind_t yysymbol)
{
  return yytname[yysymbol];
}
#endif
 
#define YYPACT_NINF (-445)
 
#define yypact_value_is_default(Yyn) \
  ((Yyn) == YYPACT_NINF)
 
#define YYTABLE_NINF (-299)
 
#define yytable_value_is_error(Yyn) \
  0
 
/* YYPACT[STATE-NUM] -- Index in YYTABLE of the portion describing
   STATE-NUM.  */
static const yytype_int16 yypact[] =
{
      46,   170,    42,    60,  -445,    90,  -445,  -445,  -445,     3,
      18,  -445,    65,    69,   180,   170,  -445,    26,  2435,  -445,
    -445,   115,  -445,    43,    90,  2210,   123,  -445,   288,  -445,
     125,   137,    72,  -445,  -445,    15,  -445,  -445,  -445,  -445,
    -445,  -445,  -445,  -445,  -445,    22,   114,  2435,   117,  -445,
    -445,  -445,  -445,  -445,  2435,  2435,  -445,  -445,  -445,  2435,
    2435,  2435,  2435,   154,  -445,   185,  -445,  2538,  2435,    25,
     190,   115,  -445,   175,  -445,  -445,  -445,   199,    43,  -445,
     187,  -445,  -445,  -445,  -445,  -445,  2282,  2300,  2210,  2210,
    2210,  2210,  2210,  2210,   276,  2210,  2210,  1150,   207,   208,
    -445,  2660,  -445,  -445,    11,  -445,  -445,   226,   288,  -445,
     226,  2062,  -445,  -445,   288,   214,  -445,   273,  -445,   287,
     218,  -445,   222,  -445,  -445,  -445,   230,  -445,  -445,  -445,
    -445,  -445,  -445,  2210,   304,  -445,  -445,  -445,  -445,  -445,
     235,  -445,   115,   240,   243,   248,   150,   244,   257,   261,
    -445,   321,  1150,   262,  1150,   262,   262,   262,   262,   262,
     262,   262,  -445,   262,   262,   119,  2706,   272,   278,    17,
     283,  2210,   346,  2210,  2210,  2210,  2210,  2210,  2210,  2210,
    2210,  2210,  2210,  2210,    76,    76,  2210,  2210,  2210,  2210,
    2210,  2210,  2210,  2210,  2210,  2210,  2210,  2210,  2210,  2210,
    2210,  2210,  2210,  2210,  -445,  -445,  1345,   354,  1828,  1419,
    -445,  -445,  -445,  -445,  -445,  -445,   320,    15,   442,  3028,
    -445,   226,   356,   357,   288,   290,  -445,  -445,   265,   327,
     285,  -445,   287,  2406,  -445,  2406,  -445,  2752,   294,   297,
     299,   270,  -445,  -445,   295,    27,   303,  -445,   143,   124,
    -445,  -445,   296,  -445,  -445,   301,   310,   311,  -445,  1900,
    1900,  -445,  -445,   313,  -445,  2136,  2798,   312,  3028,  3028,
    3028,  3028,  3028,  3028,  3028,  3028,  3028,  3028,  3028,  -445,
    -445,  1789,  1789,  2097,  2097,  2097,  2097,   363,   363,   262,
     262,   262,  1380,  2439,  1185,  3127,  3098,  1641,  1641,   308,
     317,  -445,   315,   -21,   319,   316,  -445,   454,   323,    76,
    2210,   326,  -445,  -445,   324,   333,   360,  2062,   334,   335,
     115,  1491,    43,   175,  -445,  2210,   122,   325,   285,   336,
     338,   340,  2406,   344,  2406,  -445,  -445,  -445,  -445,   418,
    -445,    45,   345,  -445,  -445,   379,   183,   181,   347,   248,
     171,  1680,  1680,  -445,  -445,   206,   442,   262,  -445,  -445,
    -445,  2210,  -445,  -445,  2210,  -445,     4,  2536,  -445,  -445,
     442,  -445,  2062,  -445,  -445,  -445,   355,   189,  -445,   349,
     358,   366,  3028,  -445,  -445,  -445,   361,  2406,  2406,   -18,
    -445,   367,  -445,   369,   352,   350,   580,  -445,   371,   374,
    -445,   384,   226,  -445,  1509,  -445,  -445,   257,   385,   226,
     386,   389,  2844,  3063,  -445,  -445,     4,  2210,  -445,  -445,
      27,  -445,  -445,   288,  -445,  -445,  -445,  -445,  2210,   383,
     390,   387,  -445,  -445,   418,   270,   308,   391,  -445,   393,
     394,    36,  1592,  -445,  2210,   396,  -445,  -445,  -445,   402,
      28,  -445,  -445,   403,   400,  -445,  -445,   694,   159,   922,
     580,  -445,  1264,  -445,    26,    45,   145,  -445,   392,   405,
     175,  -445,  -445,  -445,  -445,  -445,  -445,  2890,  -445,  -445,
    3028,  2406,   -18,  2210,  -445,  -445,   177,  -445,  -445,  -445,
     408,  1900,  -445,   411,   402,  2614,  -445,   402,   808,   419,
    1918,   808,    28,    28,   421,    43,  -445,   808,  1036,  -445,
    -445,  -445,  -445,   422,  -445,  -445,  -445,  -445,  -445,  -445,
     425,  -445,  -445,  -445,  3028,  -445,  -445,   423,  -445,  -445,
    -445,  2210,   808,   373,  -445,   149,   433,   415,  -445,  -445,
      43,   439,  1673,  1673,  -445,  -445,   808,  2936,  -445,   402,
    -445,  -445,   808,   436,  -445,   440,   441,  -445,  -445,   443,
    -445,    43,   449,  1754,  1754,  -445,   450,   446,   445,  -445,
     447,  -445,   457,  1990,    43,  -445,    43,  -445,   459,  -445,
     460,  2982,   455,  -445,   808,   808,  -445,  -445,   527,  -445,
    -445,  -445,  -445,   456,  -445,   527,  -445
};
 
/* YYDEFACT[STATE-NUM] -- Default reduction number in state STATE-NUM.
   Performed when YYTABLE does not specify something else to do.  Zero
   means the default is an error.  */
static const yytype_int16 yydefact[] =
{
       5,     5,     0,     0,     3,   187,     7,     1,     2,     0,
       0,    12,     0,     0,     0,     5,     9,   277,     0,    10,
     290,   253,   294,     0,   187,     0,     0,     6,   298,   182,
       0,   183,   185,   293,   278,     0,   228,   204,   206,   207,
     208,   212,   211,   203,   209,     0,     0,   199,     0,   213,
     214,   210,   205,   306,   199,   199,   307,   304,   305,   199,
     199,   199,   199,     0,   303,     0,   188,   201,   199,     0,
     268,     0,   296,   187,    93,    94,    95,     0,    86,    88,
       0,    24,    83,    80,    81,    90,     0,     0,     0,     0,
       0,     0,     0,     0,     0,     0,     0,     0,     0,     0,
      82,     0,    23,    84,    85,    42,    17,   277,   298,   181,
     277,     0,    18,    19,   298,     0,   247,   300,   265,     0,
     225,   218,   215,   200,   189,   223,   220,   190,   191,   193,
     194,   192,   196,   187,     0,   202,   195,   197,     8,   128,
       0,   291,     0,     0,     0,   187,   277,     0,   256,     0,
      89,     0,     0,    25,     0,    27,    29,    30,    31,    34,
      32,    33,    78,    35,    37,     8,   117,     0,     0,   277,
       0,     0,     0,     0,     0,     0,     0,     0,     0,     0,
       0,     0,     0,     0,     0,     0,     0,     0,     0,     0,
       0,     0,     0,     0,     0,     0,     0,     0,     0,     0,
       0,     0,     0,     0,    36,    38,     0,     0,     0,     0,
      45,    92,    91,   276,   299,   184,   185,     0,   100,    96,
     186,   277,     0,   253,   298,     0,   251,   246,   300,   244,
      21,   241,     0,     0,   216,     0,   221,     0,     0,     0,
       0,   137,   130,   269,   187,   187,     0,   261,   278,   289,
     262,   295,   259,   255,    11,     0,     0,     0,   125,     0,
       0,   124,    41,   289,   279,     0,     0,     0,    65,    66,
      67,    68,    69,    70,    71,    72,    73,    74,    75,    39,
      40,    57,    58,    59,    60,    61,    62,    47,    48,    49,
      50,    51,    54,    55,    56,    52,    53,    63,    64,     0,
       0,   114,     0,     0,     0,     0,   116,   300,    24,     0,
       0,     0,   104,   101,     0,    98,   106,     0,     0,     0,
       0,     0,     0,   187,   301,     0,     0,     0,    21,     0,
     233,     0,     0,     0,     0,   229,   230,   198,   131,     0,
     132,     0,     0,   297,   264,     0,   288,     0,     0,   187,
       5,    26,    28,   119,   118,     0,   100,    76,   187,    79,
      43,     0,   127,   126,     0,   253,   110,     0,   112,    97,
     100,   105,     0,   103,   248,    20,     0,     0,   121,     0,
       0,     0,   245,   243,   242,   227,     0,     0,     0,   277,
     219,     0,   224,     0,   139,     0,     0,   275,   273,     0,
      14,     0,   277,   281,     0,   286,   258,   256,     0,   277,
       0,     0,     0,    46,   111,   107,   110,     0,    99,   102,
     187,   250,   249,   298,   252,   226,   235,   232,     0,     0,
     236,   238,   217,   222,     0,   137,     8,    24,   148,     0,
       0,     0,     0,   154,     0,     0,   157,   159,   179,     0,
     308,   177,   143,     0,     0,   150,   129,     0,   144,     0,
       0,   147,     0,   151,   277,     0,   187,   284,     0,     0,
     187,   260,    15,    77,    44,    16,   108,     0,   267,   302,
     240,     0,   277,     0,   140,   138,     0,   141,   172,   173,
       0,     0,   170,     0,     0,     0,   169,     0,     0,     0,
       0,     0,   308,   308,     0,     0,   149,     0,     0,   166,
     145,   146,   135,     0,   187,   274,   271,   272,   283,   285,
       0,   109,   234,   237,   239,   178,   174,     0,   171,   155,
     167,     0,     0,     0,   180,     0,     0,   152,   309,   310,
       0,     0,     0,     0,   287,   175,     0,     0,   158,     0,
     123,   122,     0,   311,   142,     0,     0,   156,   168,     0,
     153,   313,     0,     0,     0,   160,     0,   319,   314,   315,
       0,   161,     0,     0,   313,   312,     0,   176,     0,   164,
       0,     0,   321,   316,     0,     0,   318,   317,     0,   320,
     162,   165,    87,   323,   322,     0,   324
};
 
/* YYPGOTO[NTERM-NUM].  */
static const yytype_int16 yypgoto[] =
{
    -445,  -445,  -445,     2,  -445,  -134,   512,  -445,    -1,   211,
     -24,  -445,   -23,  -445,  -445,  -445,   -29,   -98,  -445,  -144,
    -445,  -445,  -342,   128,  -445,  -445,  -435,   -74,   136,  -444,
    -445,  -445,  -445,  -445,   -39,  -445,    81,   111,   113,  -364,
    -445,  -358,  -223,  -424,  -445,  -445,  -445,  -445,  -445,  -445,
    -445,  -445,  -445,    -3,   438,  -445,   109,  -445,    19,   505,
    -445,  -445,  -445,  -445,  -445,  -445,  -192,  -445,    68,  -445,
     322,   229,   -10,   526,  -445,    -4,  -283,   156,  -445,  -445,
    -129,  -445,  -445,  -445,   -60,  -231,   103,  -136,    -8,  -118,
     -30,  -445,  -445,  -445,  -445,  -445,  -445,  -445,  -445,  -102,
     341,   -20,  -226,  -445,    -2,  -445,    -6,  -445,  -445,   -19
};
 
/* YYDEFGOTO[NTERM-NUM].  */
static const yytype_int16 yydefgoto[] =
{
       0,     2,     3,     4,     5,    14,    15,    71,   116,   327,
     166,   102,   103,   593,    78,   104,    79,   312,   313,   314,
     315,   372,   316,   415,   317,   300,   305,   454,   379,   501,
     105,   210,   140,   241,   455,   396,   456,   340,   395,   507,
     458,   508,   460,   461,   494,   546,   497,   498,   578,   514,
     585,   462,   499,   463,    30,    31,   464,    18,   123,   124,
     136,    67,   332,   233,   334,   235,   331,   389,   429,   430,
     230,   231,   216,   307,   323,   226,   147,   253,   348,   349,
     148,    33,   118,   320,    72,   342,   399,    34,   217,   170,
     468,   346,   470,   347,    19,    69,    20,    73,   144,   107,
     227,    68,   504,   562,   567,   568,   569,   575,   589,   594
};
 
/* YYTABLE[YYPACT[STATE-NUM]] -- What to do in state STATE-NUM.  If
   positive, shift that token.  If negative, reduce the rule whose
   number is the opposite.  If YYTABLE_NINF, syntax error.  */
static const yytype_int16 yytable[] =
{
      77,   101,    16,     6,   240,    22,   214,    32,   108,    35,
     248,   143,   221,   220,   343,   238,   246,    27,   112,    74,
     211,    16,   113,   167,   414,   112,   138,   513,  -270,   113,
     141,   240,   457,   248,   256,   511,   257,    66,   459,   490,
     381,    28,     7,   333,   120,   122,   397,   126,  -277,   150,
     529,    74,  -277,   532,   309,   502,    -4,   362,   168,   503,
     259,   428,   153,   155,   156,   157,   158,   159,   160,   161,
       8,   163,   164,  -292,   414,   212,    28,    21,   167,   112,
     167,   310,   243,   113,   511,    28,   135,   219,   108,   114,
    -280,    -8,    23,     9,   108,   491,   457,   228,   119,   213,
     510,   139,   459,  -270,    28,   559,    29,   555,   556,   237,
     111,    75,    76,   168,    17,   168,   250,   112,    70,  -277,
     112,   113,   321,   383,   113,   229,     1,   112,   571,   572,
     115,   113,   301,    17,   304,   306,   247,   115,   249,   264,
     391,    24,   393,    75,    76,    25,  -270,   266,  -292,   268,
     269,   270,   271,   272,   273,   274,   275,   276,   277,   278,
    -277,   263,   281,   282,   283,   284,   285,   286,   287,   288,
     289,   290,   291,   292,   293,   294,   295,   296,   297,   298,
      -4,    26,   146,   279,   280,   353,   354,   520,    10,   478,
     121,   115,   258,   125,   219,   426,   427,   -22,   345,    11,
     259,    12,    13,   106,   108,   109,   169,   401,   228,    28,
      53,   318,   410,    56,    57,    58,  -282,   311,   110,   373,
     407,  -270,   550,  -263,  -282,  -270,   418,   516,   133,   115,
     259,  -263,   115,    53,   509,   517,    56,    57,    58,   115,
     411,   357,   169,   402,   403,    -4,    -4,   378,  -254,   145,
       1,     1,   338,   409,   146,   365,  -298,   525,   404,   134,
     376,   169,   151,   169,  -298,  -298,   248,   421,   452,   453,
     259,   142,   149,   248,   419,   533,   538,   539,   537,   162,
    -298,   171,   172,  -298,   509,    28,   367,   228,   222,   522,
     229,    64,    53,   219,   232,    56,    57,    58,   234,   380,
      53,   382,   486,    56,    57,    58,   236,   239,   366,   548,
     242,   184,   185,   244,    64,    53,   245,   251,    56,    57,
      58,   479,   145,   557,   255,   108,   108,   357,   357,   560,
     378,   398,   219,   204,   205,   108,   206,   412,   252,   208,
     413,   254,   330,   405,   330,   261,   219,   223,   219,   267,
     224,   262,   408,   341,   341,   311,   265,   302,   111,   319,
    -266,   590,   591,   225,   322,   325,   326,   336,   493,   311,
     337,   225,   339,    64,   338,  -270,   344,   350,  -257,   431,
     401,    64,  -298,   351,   352,   359,  -298,   355,   306,   259,
     360,   361,   318,   477,   249,   364,    64,   363,   371,   369,
     385,   263,   -18,   108,   480,   368,    53,   374,   375,    56,
      57,    58,   184,   185,   370,   390,   387,   527,   388,   392,
     495,   394,   194,   195,   196,   400,   536,   422,   420,   406,
     435,   423,   146,   434,   204,   205,   425,   206,  -298,   424,
     208,   330,   432,   330,   433,   308,    82,    83,    84,   113,
      74,    85,   465,  -298,   466,   398,  -298,   467,   146,   524,
     472,   473,   474,   481,   549,   518,   483,   169,   306,   306,
     487,   482,   431,   488,   489,   496,   500,   505,    86,    87,
     506,    53,   541,   519,    56,    57,    58,    64,   526,   306,
     306,   528,   309,   534,  -298,   540,   330,   330,   544,    88,
      89,    90,   542,   545,    91,    92,   551,   547,    93,    94,
     552,   543,   554,    95,    96,   561,    97,   553,   218,   310,
     563,   564,   570,   565,   573,   574,   576,   577,   365,   341,
     579,   224,   584,   586,   588,   592,    80,   595,   566,   386,
     469,   512,    75,    76,   476,    98,   485,   484,   215,   581,
     523,   566,   225,   566,   328,   384,    99,   115,   100,   127,
     128,   117,    64,   471,   129,   130,   131,   132,   515,   324,
     583,     0,   582,   137,     0,   341,   596,     0,     0,   146,
       0,   436,     0,   437,    82,    83,    84,  -187,    74,    85,
     330,  -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,
    -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,
    -187,  -187,  -187,  -187,  -187,  -187,    86,    87,     0,     0,
       0,     0,     0,     0,     0,     0,     0,     0,     0,     0,
       0,     0,     0,     0,     0,     0,     0,    88,    89,    90,
       0,     0,    91,    92,     0,     0,    93,    94,     0,     0,
       0,    95,    96,     0,    97,  -133,   139,     0,     0,     0,
     438,     0,     0,     0,   439,   440,   441,   442,   443,   444,
     445,   446,   447,   448,   449,     0,     0,  -187,   450,  -187,
      75,    76,     0,    98,     0,     0,     0,   451,  -187,   452,
     453,     0,     0,  -187,    99,   436,   100,   437,    82,    83,
      84,  -187,    74,    85,     0,  -187,  -187,  -187,  -187,  -187,
    -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,
    -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,
      86,    87,     0,     0,     0,     0,     0,     0,     0,     0,
       0,     0,     0,     0,     0,     0,     0,     0,     0,     0,
       0,    88,    89,    90,     0,     0,    91,    92,     0,     0,
      93,    94,     0,     0,     0,    95,    96,     0,    97,  -136,
     139,     0,     0,     0,   438,     0,     0,     0,   439,   440,
     441,   442,   443,   444,   445,   446,   447,   448,   449,     0,
       0,  -187,   450,  -187,    75,    76,     0,    98,     0,     0,
       0,   451,  -187,   452,   453,     0,     0,  -187,    99,   436,
     100,   437,    82,    83,    84,  -187,    74,    85,     0,  -187,
    -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,
    -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,
    -187,  -187,  -187,  -187,    86,    87,     0,     0,     0,     0,
       0,     0,     0,     0,     0,     0,     0,     0,     0,     0,
       0,     0,     0,     0,     0,    88,    89,    90,     0,     0,
      91,    92,     0,     0,    93,    94,     0,     0,     0,    95,
      96,     0,    97,     0,   139,     0,     0,     0,   438,     0,
       0,     0,   439,   440,   441,   442,   443,   444,   445,   446,
     447,   448,   449,     0,     0,  -187,   450,  -187,    75,    76,
       0,    98,     0,     0,     0,   451,  -187,   452,   453,     0,
       0,  -187,    99,   436,   100,   437,    82,    83,    84,  -187,
      74,    85,     0,  -187,  -187,  -187,  -187,  -187,  -187,  -187,
    -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,
    -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,    86,    87,
       0,     0,     0,     0,     0,     0,     0,     0,     0,     0,
       0,     0,     0,     0,     0,     0,     0,     0,     0,    88,
      89,    90,     0,     0,    91,    92,     0,     0,    93,    94,
       0,     0,     0,    95,    96,     0,    97,  -134,   139,     0,
       0,     0,   438,     0,     0,     0,   439,   440,   441,   442,
     443,   444,   445,   446,   447,   448,   449,     0,     0,  -187,
     450,  -187,    75,    76,     0,    98,     0,     0,     0,   451,
    -187,     0,     0,     0,     0,  -187,    99,   436,   100,   437,
      82,    83,    84,  -187,    74,    85,     0,  -187,  -187,  -187,
    -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,
    -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,
    -187,  -187,    86,    87,     0,     0,     0,     0,     0,     0,
       0,     0,     0,     0,     0,     0,     0,     0,     0,     0,
       0,     0,     0,    88,    89,    90,     0,     0,    91,    92,
       0,     0,    93,    94,     0,     0,     0,    95,    96,     0,
      97,     0,   139,     0,     0,     0,   438,     0,     0,     0,
     439,   440,   441,   442,   443,   444,   445,   446,   447,   448,
     449,     0,     0,  -187,   450,  -187,    75,    76,     0,    98,
       0,     0,     0,   451,  -187,     0,     0,     0,     0,  -187,
      99,   165,   100,    81,    82,    83,    84,  -187,    74,    85,
       0,  -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,
    -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,
    -187,  -187,  -187,  -187,  -187,  -187,    86,    87,     0,     0,
       0,     0,     0,     0,     0,     0,     0,     0,     0,     0,
       0,     0,     0,     0,     0,     0,     0,    88,    89,    90,
       0,     0,    91,    92,     0,     0,    93,    94,     0,     0,
       0,    95,    96,     0,    97,     0,   139,     0,     0,     0,
       0,     0,     0,     0,   184,   185,   186,   187,   188,   189,
     190,   191,   192,   193,   194,   195,   196,  -187,   197,  -187,
      75,    76,     0,    98,   202,   203,   204,   205,  -187,   206,
       0,     0,   208,  -187,    99,   299,   100,    81,    82,    83,
      84,  -163,    74,    85,     0,  -163,  -163,  -163,  -163,  -163,
    -163,  -163,  -163,  -163,  -163,  -163,  -163,  -163,  -163,  -163,
    -163,  -163,  -163,  -163,  -163,  -163,  -163,  -163,  -163,  -163,
      86,    87,     0,     0,     0,     0,     0,     0,     0,     0,
       0,     0,     0,     0,     0,     0,     0,     0,     0,     0,
       0,    88,    89,    90,     0,     0,    91,    92,     0,     0,
      93,    94,     0,     0,     0,    95,    96,     0,    97,     0,
       0,     0,     0,     0,  -115,     0,   299,     0,    81,    82,
      83,    84,     0,    74,    85,     0,     0,     0,     0,     0,
       0,  -163,     0,  -163,    75,    76,     0,    98,     0,     0,
       0,     0,  -163,     0,     0,     0,     0,  -163,    99,     0,
     100,    86,    87,     0,     0,     0,     0,     0,     0,     0,
       0,     0,     0,     0,     0,     0,     0,     0,     0,     0,
       0,     0,    88,    89,    90,     0,     0,    91,    92,     0,
       0,    93,    94,     0,     0,     0,    95,    96,  -113,    97,
     299,     0,    81,    82,    83,    84,     0,    74,    85,   184,
     185,   186,   187,   188,   189,   190,   191,   192,   193,   194,
     195,   196,     0,     0,     0,    75,    76,     0,    98,   202,
     203,   204,   205,     0,   206,    86,    87,   208,     0,    99,
       0,   100,     0,     0,     0,     0,     0,     0,     0,     0,
       0,     0,     0,     0,     0,     0,    88,    89,    90,     0,
       0,    91,    92,     0,     0,    93,    94,     0,     0,     0,
      95,    96,   377,    97,    81,    82,    83,    84,  -115,    74,
      85,     0,     0,     0,     0,     0,     0,     0,     0,     0,
     299,     0,    81,    82,    83,    84,     0,    74,    85,    75,
      76,     0,    98,     0,     0,     0,     0,    86,    87,     0,
       0,     0,     0,    99,     0,   100,     0,     0,     0,     0,
       0,     0,     0,     0,     0,    86,    87,     0,    88,    89,
      90,     0,     0,    91,    92,     0,     0,    93,    94,     0,
       0,     0,    95,    96,     0,    97,    88,    89,    90,  -120,
       0,    91,    92,     0,     0,    93,    94,     0,     0,     0,
      95,    96,     0,    97,     0,     0,     0,  -120,     0,     0,
       0,    75,    76,   299,    98,    81,    82,    83,    84,     0,
      74,    85,     0,     0,     0,    99,     0,   100,     0,    75,
      76,     0,    98,     0,     0,     0,     0,     0,     0,     0,
       0,     0,     0,    99,     0,   100,     0,     0,    86,    87,
       0,     0,     0,     0,     0,     0,     0,     0,     0,     0,
       0,     0,     0,     0,     0,     0,     0,     0,     0,    88,
      89,    90,     0,     0,    91,    92,     0,     0,    93,    94,
       0,     0,     0,    95,    96,     0,    97,     0,     0,     0,
       0,     0,   492,     0,   299,     0,    81,    82,    83,    84,
       0,    74,    85,    81,    82,    83,    84,     0,    74,    85,
     184,   185,    75,    76,     0,    98,     0,     0,   192,   193,
     194,   195,   196,     0,     0,     0,    99,     0,   100,    86,
      87,     0,   204,   205,     0,   206,    86,    87,   208,     0,
       0,     0,     0,     0,     0,     0,     0,     0,     0,     0,
      88,    89,    90,     0,     0,    91,    92,     0,     0,    93,
      94,     0,    91,     0,    95,    96,    93,    97,     0,     0,
       0,    95,    96,  -115,    97,   299,   356,    81,    82,    83,
      84,     0,    74,    85,     0,     0,     0,     0,     0,     0,
       0,     0,     0,    75,    76,     0,    98,     0,     0,     0,
      75,    76,     0,    98,     0,     0,     0,    99,     0,   100,
      86,    87,     0,     0,    99,     0,   100,     0,     0,     0,
       0,     0,     0,     0,     0,     0,     0,     0,     0,     0,
       0,    88,    89,    90,     0,     0,    91,    92,     0,     0,
      93,    94,     0,     0,     0,    95,    96,  -115,    97,   303,
       0,    81,    82,    83,    84,     0,    74,    85,   184,   185,
       0,     0,   188,   189,   190,   191,   192,   193,   194,   195,
     196,     0,     0,     0,    75,    76,     0,    98,   202,   203,
     204,   205,     0,   206,    86,    87,   208,     0,    99,     0,
     100,     0,     0,     0,     0,     0,     0,     0,     0,     0,
       0,     0,     0,     0,     0,    88,    89,    90,     0,     0,
      91,    92,     0,     0,    93,    94,     0,     0,     0,    95,
      96,   299,    97,    81,    82,    83,    84,     0,    74,    85,
       0,     0,     0,     0,     0,     0,     0,     0,     0,   535,
       0,    81,    82,    83,    84,     0,    74,    85,    75,    76,
       0,    98,     0,     0,     0,     0,    86,    87,     0,     0,
       0,     0,    99,     0,   100,     0,     0,     0,     0,     0,
       0,     0,     0,     0,    86,    87,     0,    88,    89,    90,
       0,     0,    91,    92,     0,     0,    93,    94,     0,     0,
       0,    95,    96,     0,    97,    88,    89,    90,     0,     0,
      91,    92,     0,     0,    93,    94,     0,     0,     0,    95,
      96,   580,    97,    81,    82,    83,    84,     0,    74,    85,
      75,    76,     0,    98,     0,     0,     0,     0,     0,     0,
       0,     0,     0,     0,    99,     0,   100,     0,    75,    76,
       0,    98,     0,     0,     0,     0,    86,    87,     0,     0,
       0,     0,    99,     0,   100,     0,     0,     0,     0,     0,
       0,     0,     0,     0,     0,     0,     0,    88,    89,    90,
       0,     0,    91,    92,     0,     0,    93,    94,     0,     0,
       0,    95,    96,     0,    97,    81,    82,    83,    84,     0,
      74,    85,     0,     0,     0,     0,     0,     0,     0,     0,
       0,     0,     0,     0,     0,     0,     0,     0,     0,     0,
      75,    76,     0,    98,     0,     0,     0,     0,    86,    87,
       0,     0,     0,     0,    99,     0,   100,     0,     0,     0,
       0,     0,     0,     0,     0,     0,     0,     0,     0,    88,
      89,    90,     0,     0,    91,    92,     0,     0,    93,    94,
       0,     0,     0,    95,    96,     0,    97,     0,   218,    81,
      82,    83,    84,     0,    74,    85,   184,   185,     0,     0,
       0,     0,     0,     0,   192,   193,   194,   195,   196,     0,
       0,     0,    75,    76,     0,    98,   202,   203,   204,   205,
       0,   206,    86,    87,   208,     0,    99,     0,   100,     0,
       0,     0,     0,     0,     0,     0,     0,     0,     0,     0,
       0,     0,     0,    88,    89,    90,     0,     0,    91,    92,
       0,     0,    93,    94,     0,     0,     0,    95,    96,     0,
      97,     0,   356,    81,    82,    83,    84,     0,    74,    85,
       0,     0,     0,     0,     0,     0,     0,     0,     0,     0,
       0,     0,     0,     0,     0,     0,    75,    76,     0,    98,
       0,     0,     0,     0,     0,     0,    86,    87,     0,     0,
      99,     0,   100,     0,     0,     0,     0,     0,     0,     0,
       0,     0,     0,     0,     0,     0,     0,    88,    89,    90,
       0,     0,    91,    92,     0,     0,    93,    94,     0,     0,
       0,    95,    96,     0,    97,    81,    82,    83,    84,     0,
      74,    85,     0,     0,     0,     0,     0,     0,     0,     0,
       0,     0,     0,    81,    82,    83,    84,     0,    74,    85,
      75,    76,     0,    98,     0,     0,     0,     0,    86,    87,
       0,     0,     0,     0,    99,     0,   100,     0,     0,     0,
       0,     0,     0,     0,     0,     0,    86,    87,     0,    88,
      89,    90,     0,     0,    91,    92,     0,     0,    93,    94,
       0,     0,     0,    95,    96,     0,   152,    88,    89,    90,
       0,     0,    91,    92,     0,     0,    93,    94,     0,     0,
       0,    95,    96,     0,   154,     0,     0,     0,     0,     0,
       0,     0,    75,    76,     0,    98,     0,     0,     0,     0,
       0,     0,     0,     0,     0,     0,    99,     0,   100,     0,
      75,    76,     0,    98,     0,     0,     0,   329,     0,     0,
       0,     0,     0,  -187,    99,     0,   100,  -187,  -187,  -187,
    -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,
    -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,  -187,
    -187,  -187,    36,     0,     0,     0,    37,    38,    39,    40,
      41,    42,    43,    44,    45,    46,    47,    48,    49,    50,
      51,    52,    53,    54,    55,    56,    57,    58,    59,    60,
      61,     0,     0,     0,     0,     0,     0,     0,     0,     0,
       0,  -231,     0,     0,     0,     0,     0,     0,   184,   185,
     186,   187,   188,   189,   190,   191,   192,   193,   194,   195,
     196,     0,   197,  -187,   199,  -187,     0,     0,   202,   203,
     204,   205,     0,   206,  -187,     0,   208,     0,     0,  -187,
       0,     0,     0,     0,     0,     0,     0,     0,     0,     0,
       0,     0,    62,     0,    63,     0,     0,     0,     0,     0,
       0,     0,     0,    64,     0,     0,     0,     0,    65,    37,
      38,    39,    40,    41,    42,    43,    44,    45,    46,    47,
      48,    49,    50,    51,    52,    53,    54,    55,    56,    57,
      58,    59,    60,    61,   173,   174,   175,   176,   177,   178,
     179,   180,   181,   182,   183,   184,   185,   186,   187,   188,
     189,   190,   191,   192,   193,   194,   195,   196,     0,   197,
     198,   199,     0,   200,   201,   202,   203,   204,   205,     0,
     206,     0,     0,   208,   416,     0,     0,     0,   417,   209,
       0,     0,     0,     0,     0,     0,     0,     0,     0,     0,
       0,     0,     0,     0,     0,    62,     0,    63,     0,     0,
       0,     0,     0,     0,     0,     0,    64,     0,     0,     0,
       0,    65,   173,   174,   175,   176,   177,   178,   179,   180,
     181,   182,   183,   184,   185,   186,   187,   188,   189,   190,
     191,   192,   193,   194,   195,   196,     0,   197,   198,   199,
       0,   200,   201,   202,   203,   204,   205,     0,   206,     0,
       0,   208,     0,   530,     0,     0,   531,   209,   173,   174,
     175,   176,   177,   178,   179,   180,   181,   182,   183,   184,
     185,   186,   187,   188,   189,   190,   191,   192,   193,   194,
     195,   196,     0,   197,   198,   199,     0,   200,   201,   202,
     203,   204,   205,     0,   206,   207,     0,   208,     0,     0,
       0,     0,     0,   209,   173,   174,   175,   176,   177,   178,
     179,   180,   181,   182,   183,   184,   185,   186,   187,   188,
     189,   190,   191,   192,   193,   194,   195,   196,     0,   197,
     198,   199,     0,   200,   201,   202,   203,   204,   205,     0,
     206,     0,     0,   208,     0,     0,     0,   260,     0,   209,
     173,   174,   175,   176,   177,   178,   179,   180,   181,   182,
     183,   184,   185,   186,   187,   188,   189,   190,   191,   192,
     193,   194,   195,   196,     0,   197,   198,   199,     0,   200,
     201,   202,   203,   204,   205,   335,   206,     0,     0,   208,
       0,     0,     0,     0,     0,   209,   173,   174,   175,   176,
     177,   178,   179,   180,   181,   182,   183,   184,   185,   186,
     187,   188,   189,   190,   191,   192,   193,   194,   195,   196,
       0,   197,   198,   199,     0,   200,   201,   202,   203,   204,
     205,     0,   206,     0,     0,   208,     0,     0,     0,   358,
       0,   209,   173,   174,   175,   176,   177,   178,   179,   180,
     181,   182,   183,   184,   185,   186,   187,   188,   189,   190,
     191,   192,   193,   194,   195,   196,     0,   197,   198,   199,
       0,   200,   201,   202,   203,   204,   205,     0,   206,   475,
       0,   208,     0,     0,     0,     0,     0,   209,   173,   174,
     175,   176,   177,   178,   179,   180,   181,   182,   183,   184,
     185,   186,   187,   188,   189,   190,   191,   192,   193,   194,
     195,   196,     0,   197,   198,   199,     0,   200,   201,   202,
     203,   204,   205,     0,   206,     0,     0,   208,   521,     0,
       0,     0,     0,   209,   173,   174,   175,   176,   177,   178,
     179,   180,   181,   182,   183,   184,   185,   186,   187,   188,
     189,   190,   191,   192,   193,   194,   195,   196,     0,   197,
     198,   199,     0,   200,   201,   202,   203,   204,   205,     0,
     206,     0,     0,   208,     0,   558,     0,     0,     0,   209,
     173,   174,   175,   176,   177,   178,   179,   180,   181,   182,
     183,   184,   185,   186,   187,   188,   189,   190,   191,   192,
     193,   194,   195,   196,     0,   197,   198,   199,     0,   200,
     201,   202,   203,   204,   205,   587,   206,     0,     0,   208,
       0,     0,     0,     0,     0,   209,   173,   174,   175,   176,
     177,   178,   179,   180,   181,   182,   183,   184,   185,   186,
     187,   188,   189,   190,   191,   192,   193,   194,   195,   196,
       0,   197,   198,   199,     0,   200,   201,   202,   203,   204,
     205,     0,   206,     0,     0,   208,     0,     0,     0,     0,
       0,   209,   184,   185,   186,   187,   188,   189,   190,   191,
     192,   193,   194,   195,   196,     0,   197,   198,   199,     0,
     200,   201,   202,   203,   204,   205,     0,   206,     0,     0,
     208,     0,     0,     0,     0,     0,   209,   184,   185,   186,
     187,   188,   189,   190,   191,   192,   193,   194,   195,   196,
       0,   197,   198,   199,     0,   200,     0,   202,   203,   204,
     205,     0,   206,     0,     0,   208,   184,   185,   186,   187,
     188,   189,   190,   191,   192,   193,   194,   195,   196,     0,
     197,   198,   199,     0,     0,     0,   202,   203,   204,   205,
       0,   206,     0,     0,   208
};
 
static const yytype_int16 yycheck[] =
{
      23,    25,     5,     1,   138,     9,   108,    17,    28,    17,
     146,    71,   114,   111,   245,   133,   145,    15,     3,     8,
       9,    24,     7,    97,   366,     3,     1,   462,     1,     7,
      69,   165,   396,   169,   152,   459,   154,    18,   396,     3,
     323,    59,     0,   235,    45,    46,     1,    48,     3,    78,
     494,     8,     7,   497,    50,    27,    10,    78,    97,    31,
      81,    79,    86,    87,    88,    89,    90,    91,    92,    93,
      10,    95,    96,     1,   416,   104,    59,    74,   152,     3,
     154,    77,   142,     7,   508,    59,    67,   111,   108,    74,
      73,     1,    74,     3,   114,    59,   460,   117,    76,   107,
     458,    76,   460,    76,    59,   549,    80,   542,   543,   133,
      38,   100,   101,   152,     5,   154,   146,     3,     3,    74,
       3,     7,   224,     1,     7,     3,    80,     3,   563,   564,
     115,     7,   206,    24,   208,   209,   146,   115,   146,   169,
     332,    76,   334,   100,   101,    76,     1,   171,    76,   173,
     174,   175,   176,   177,   178,   179,   180,   181,   182,   183,
     115,   169,   186,   187,   188,   189,   190,   191,   192,   193,
     194,   195,   196,   197,   198,   199,   200,   201,   202,   203,
      10,     1,    73,   184,   185,   259,   260,   470,    98,   420,
      76,   115,    73,    76,   218,   387,   388,    75,    74,   109,
      81,   111,   112,    80,   224,    80,    97,     1,   228,    59,
      27,   221,   356,    30,    31,    32,    73,   218,    81,   317,
     349,    76,    73,    73,    81,    80,   370,    82,    74,   115,
      81,    81,   115,    27,   457,   466,    30,    31,    32,   115,
     358,   265,   133,   345,   346,    75,    75,   321,    73,    74,
      80,    80,    75,   355,   145,    74,    73,    80,    77,    74,
     320,   152,    75,   154,    81,    59,   402,    78,   109,   110,
      81,    81,    73,   409,   372,   498,   502,   503,   501,     3,
      74,    74,    74,    77,   507,    59,   310,   307,    74,   481,
       3,   108,    27,   317,    76,    30,    31,    32,    76,   322,
      27,   325,   436,    30,    31,    32,    76,     3,   309,   532,
      75,    49,    50,    73,   108,    27,    73,    73,    30,    31,
      32,   423,    74,   546,     3,   345,   346,   351,   352,   552,
     404,   341,   356,    71,    72,   355,    74,   361,    81,    77,
     364,    80,   233,   347,   235,    73,   370,    74,   372,     3,
      77,    73,   350,   244,   245,   356,    73,     3,    38,     3,
       3,   584,   585,    98,    74,    38,    81,    73,   442,   370,
      73,    98,   102,   108,    75,    80,    73,    76,    82,   389,
       1,   108,     3,    73,    73,    73,     7,    74,   462,    81,
      73,    76,   402,   417,   402,    79,   108,    78,    38,    75,
      75,   409,    79,   423,   428,    79,    27,    73,    73,    30,
      31,    32,    49,    50,    81,    75,    80,   491,    80,    75,
     444,     3,    59,    60,    61,    80,   500,    78,    73,    82,
      80,    73,   323,    81,    71,    72,    75,    74,    59,    73,
      77,   332,    75,   334,    75,     3,     4,     5,     6,     7,
       8,     9,    81,    74,    80,   465,    77,    73,   349,   483,
      75,    75,    73,    80,    91,    73,    79,   358,   542,   543,
      79,    81,   482,    80,    80,    79,    74,    74,    36,    37,
      80,    27,   505,    78,    30,    31,    32,   108,    80,   563,
     564,    80,    50,    74,   115,    74,   387,   388,    73,    57,
      58,    59,    80,    80,    62,    63,    73,   531,    66,    67,
      95,   514,    73,    71,    72,    79,    74,   540,    76,    77,
      80,    80,    73,    80,    74,    79,    81,    80,    74,   420,
      73,    77,    73,    73,    79,     8,    24,    81,   561,   328,
     404,   460,   100,   101,   416,   103,   435,   434,   110,   573,
     482,   574,    98,   576,   232,   326,   114,   115,   116,    54,
      55,    35,   108,   407,    59,    60,    61,    62,   465,   228,
     576,    -1,   574,    68,    -1,   466,   595,    -1,    -1,   470,
      -1,     1,    -1,     3,     4,     5,     6,     7,     8,     9,
     481,    11,    12,    13,    14,    15,    16,    17,    18,    19,
      20,    21,    22,    23,    24,    25,    26,    27,    28,    29,
      30,    31,    32,    33,    34,    35,    36,    37,    -1,    -1,
      -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
      -1,    -1,    -1,    -1,    -1,    -1,    -1,    57,    58,    59,
      -1,    -1,    62,    63,    -1,    -1,    66,    67,    -1,    -1,
      -1,    71,    72,    -1,    74,    75,    76,    -1,    -1,    -1,
      80,    -1,    -1,    -1,    84,    85,    86,    87,    88,    89,
      90,    91,    92,    93,    94,    -1,    -1,    97,    98,    99,
     100,   101,    -1,   103,    -1,    -1,    -1,   107,   108,   109,
     110,    -1,    -1,   113,   114,     1,   116,     3,     4,     5,
       6,     7,     8,     9,    -1,    11,    12,    13,    14,    15,
      16,    17,    18,    19,    20,    21,    22,    23,    24,    25,
      26,    27,    28,    29,    30,    31,    32,    33,    34,    35,
      36,    37,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
      -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
      -1,    57,    58,    59,    -1,    -1,    62,    63,    -1,    -1,
      66,    67,    -1,    -1,    -1,    71,    72,    -1,    74,    75,
      76,    -1,    -1,    -1,    80,    -1,    -1,    -1,    84,    85,
      86,    87,    88,    89,    90,    91,    92,    93,    94,    -1,
      -1,    97,    98,    99,   100,   101,    -1,   103,    -1,    -1,
      -1,   107,   108,   109,   110,    -1,    -1,   113,   114,     1,
     116,     3,     4,     5,     6,     7,     8,     9,    -1,    11,
      12,    13,    14,    15,    16,    17,    18,    19,    20,    21,
      22,    23,    24,    25,    26,    27,    28,    29,    30,    31,
      32,    33,    34,    35,    36,    37,    -1,    -1,    -1,    -1,
      -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
      -1,    -1,    -1,    -1,    -1,    57,    58,    59,    -1,    -1,
      62,    63,    -1,    -1,    66,    67,    -1,    -1,    -1,    71,
      72,    -1,    74,    -1,    76,    -1,    -1,    -1,    80,    -1,
      -1,    -1,    84,    85,    86,    87,    88,    89,    90,    91,
      92,    93,    94,    -1,    -1,    97,    98,    99,   100,   101,
      -1,   103,    -1,    -1,    -1,   107,   108,   109,   110,    -1,
      -1,   113,   114,     1,   116,     3,     4,     5,     6,     7,
       8,     9,    -1,    11,    12,    13,    14,    15,    16,    17,
      18,    19,    20,    21,    22,    23,    24,    25,    26,    27,
      28,    29,    30,    31,    32,    33,    34,    35,    36,    37,
      -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
      -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    57,
      58,    59,    -1,    -1,    62,    63,    -1,    -1,    66,    67,
      -1,    -1,    -1,    71,    72,    -1,    74,    75,    76,    -1,
      -1,    -1,    80,    -1,    -1,    -1,    84,    85,    86,    87,
      88,    89,    90,    91,    92,    93,    94,    -1,    -1,    97,
      98,    99,   100,   101,    -1,   103,    -1,    -1,    -1,   107,
     108,    -1,    -1,    -1,    -1,   113,   114,     1,   116,     3,
       4,     5,     6,     7,     8,     9,    -1,    11,    12,    13,
      14,    15,    16,    17,    18,    19,    20,    21,    22,    23,
      24,    25,    26,    27,    28,    29,    30,    31,    32,    33,
      34,    35,    36,    37,    -1,    -1,    -1,    -1,    -1,    -1,
      -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
      -1,    -1,    -1,    57,    58,    59,    -1,    -1,    62,    63,
      -1,    -1,    66,    67,    -1,    -1,    -1,    71,    72,    -1,
      74,    -1,    76,    -1,    -1,    -1,    80,    -1,    -1,    -1,
      84,    85,    86,    87,    88,    89,    90,    91,    92,    93,
      94,    -1,    -1,    97,    98,    99,   100,   101,    -1,   103,
      -1,    -1,    -1,   107,   108,    -1,    -1,    -1,    -1,   113,
     114,     1,   116,     3,     4,     5,     6,     7,     8,     9,
      -1,    11,    12,    13,    14,    15,    16,    17,    18,    19,
      20,    21,    22,    23,    24,    25,    26,    27,    28,    29,
      30,    31,    32,    33,    34,    35,    36,    37,    -1,    -1,
      -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
      -1,    -1,    -1,    -1,    -1,    -1,    -1,    57,    58,    59,
      -1,    -1,    62,    63,    -1,    -1,    66,    67,    -1,    -1,
      -1,    71,    72,    -1,    74,    -1,    76,    -1,    -1,    -1,
      -1,    -1,    -1,    -1,    49,    50,    51,    52,    53,    54,
      55,    56,    57,    58,    59,    60,    61,    97,    63,    99,
     100,   101,    -1,   103,    69,    70,    71,    72,   108,    74,
      -1,    -1,    77,   113,   114,     1,   116,     3,     4,     5,
       6,     7,     8,     9,    -1,    11,    12,    13,    14,    15,
      16,    17,    18,    19,    20,    21,    22,    23,    24,    25,
      26,    27,    28,    29,    30,    31,    32,    33,    34,    35,
      36,    37,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
      -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
      -1,    57,    58,    59,    -1,    -1,    62,    63,    -1,    -1,
      66,    67,    -1,    -1,    -1,    71,    72,    -1,    74,    -1,
      -1,    -1,    -1,    -1,    80,    -1,     1,    -1,     3,     4,
       5,     6,    -1,     8,     9,    -1,    -1,    -1,    -1,    -1,
      -1,    97,    -1,    99,   100,   101,    -1,   103,    -1,    -1,
      -1,    -1,   108,    -1,    -1,    -1,    -1,   113,   114,    -1,
     116,    36,    37,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
      -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
      -1,    -1,    57,    58,    59,    -1,    -1,    62,    63,    -1,
      -1,    66,    67,    -1,    -1,    -1,    71,    72,    73,    74,
       1,    -1,     3,     4,     5,     6,    -1,     8,     9,    49,
      50,    51,    52,    53,    54,    55,    56,    57,    58,    59,
      60,    61,    -1,    -1,    -1,   100,   101,    -1,   103,    69,
      70,    71,    72,    -1,    74,    36,    37,    77,    -1,   114,
      -1,   116,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
      -1,    -1,    -1,    -1,    -1,    -1,    57,    58,    59,    -1,
      -1,    62,    63,    -1,    -1,    66,    67,    -1,    -1,    -1,
      71,    72,     1,    74,     3,     4,     5,     6,    79,     8,
       9,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
       1,    -1,     3,     4,     5,     6,    -1,     8,     9,   100,
     101,    -1,   103,    -1,    -1,    -1,    -1,    36,    37,    -1,
      -1,    -1,    -1,   114,    -1,   116,    -1,    -1,    -1,    -1,
      -1,    -1,    -1,    -1,    -1,    36,    37,    -1,    57,    58,
      59,    -1,    -1,    62,    63,    -1,    -1,    66,    67,    -1,
      -1,    -1,    71,    72,    -1,    74,    57,    58,    59,    78,
      -1,    62,    63,    -1,    -1,    66,    67,    -1,    -1,    -1,
      71,    72,    -1,    74,    -1,    -1,    -1,    78,    -1,    -1,
      -1,   100,   101,     1,   103,     3,     4,     5,     6,    -1,
       8,     9,    -1,    -1,    -1,   114,    -1,   116,    -1,   100,
     101,    -1,   103,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
      -1,    -1,    -1,   114,    -1,   116,    -1,    -1,    36,    37,
      -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
      -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    57,
      58,    59,    -1,    -1,    62,    63,    -1,    -1,    66,    67,
      -1,    -1,    -1,    71,    72,    -1,    74,    -1,    -1,    -1,
      -1,    -1,    80,    -1,     1,    -1,     3,     4,     5,     6,
      -1,     8,     9,     3,     4,     5,     6,    -1,     8,     9,
      49,    50,   100,   101,    -1,   103,    -1,    -1,    57,    58,
      59,    60,    61,    -1,    -1,    -1,   114,    -1,   116,    36,
      37,    -1,    71,    72,    -1,    74,    36,    37,    77,    -1,
      -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
      57,    58,    59,    -1,    -1,    62,    63,    -1,    -1,    66,
      67,    -1,    62,    -1,    71,    72,    66,    74,    -1,    -1,
      -1,    71,    72,    80,    74,     1,    76,     3,     4,     5,
       6,    -1,     8,     9,    -1,    -1,    -1,    -1,    -1,    -1,
      -1,    -1,    -1,   100,   101,    -1,   103,    -1,    -1,    -1,
     100,   101,    -1,   103,    -1,    -1,    -1,   114,    -1,   116,
      36,    37,    -1,    -1,   114,    -1,   116,    -1,    -1,    -1,
      -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
      -1,    57,    58,    59,    -1,    -1,    62,    63,    -1,    -1,
      66,    67,    -1,    -1,    -1,    71,    72,    73,    74,     1,
      -1,     3,     4,     5,     6,    -1,     8,     9,    49,    50,
      -1,    -1,    53,    54,    55,    56,    57,    58,    59,    60,
      61,    -1,    -1,    -1,   100,   101,    -1,   103,    69,    70,
      71,    72,    -1,    74,    36,    37,    77,    -1,   114,    -1,
     116,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
      -1,    -1,    -1,    -1,    -1,    57,    58,    59,    -1,    -1,
      62,    63,    -1,    -1,    66,    67,    -1,    -1,    -1,    71,
      72,     1,    74,     3,     4,     5,     6,    -1,     8,     9,
      -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,     1,
      -1,     3,     4,     5,     6,    -1,     8,     9,   100,   101,
      -1,   103,    -1,    -1,    -1,    -1,    36,    37,    -1,    -1,
      -1,    -1,   114,    -1,   116,    -1,    -1,    -1,    -1,    -1,
      -1,    -1,    -1,    -1,    36,    37,    -1,    57,    58,    59,
      -1,    -1,    62,    63,    -1,    -1,    66,    67,    -1,    -1,
      -1,    71,    72,    -1,    74,    57,    58,    59,    -1,    -1,
      62,    63,    -1,    -1,    66,    67,    -1,    -1,    -1,    71,
      72,     1,    74,     3,     4,     5,     6,    -1,     8,     9,
     100,   101,    -1,   103,    -1,    -1,    -1,    -1,    -1,    -1,
      -1,    -1,    -1,    -1,   114,    -1,   116,    -1,   100,   101,
      -1,   103,    -1,    -1,    -1,    -1,    36,    37,    -1,    -1,
      -1,    -1,   114,    -1,   116,    -1,    -1,    -1,    -1,    -1,
      -1,    -1,    -1,    -1,    -1,    -1,    -1,    57,    58,    59,
      -1,    -1,    62,    63,    -1,    -1,    66,    67,    -1,    -1,
      -1,    71,    72,    -1,    74,     3,     4,     5,     6,    -1,
       8,     9,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
      -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
     100,   101,    -1,   103,    -1,    -1,    -1,    -1,    36,    37,
      -1,    -1,    -1,    -1,   114,    -1,   116,    -1,    -1,    -1,
      -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    57,
      58,    59,    -1,    -1,    62,    63,    -1,    -1,    66,    67,
      -1,    -1,    -1,    71,    72,    -1,    74,    -1,    76,     3,
       4,     5,     6,    -1,     8,     9,    49,    50,    -1,    -1,
      -1,    -1,    -1,    -1,    57,    58,    59,    60,    61,    -1,
      -1,    -1,   100,   101,    -1,   103,    69,    70,    71,    72,
      -1,    74,    36,    37,    77,    -1,   114,    -1,   116,    -1,
      -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
      -1,    -1,    -1,    57,    58,    59,    -1,    -1,    62,    63,
      -1,    -1,    66,    67,    -1,    -1,    -1,    71,    72,    -1,
      74,    -1,    76,     3,     4,     5,     6,    -1,     8,     9,
      -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
      -1,    -1,    -1,    -1,    -1,    -1,   100,   101,    -1,   103,
      -1,    -1,    -1,    -1,    -1,    -1,    36,    37,    -1,    -1,
     114,    -1,   116,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
      -1,    -1,    -1,    -1,    -1,    -1,    -1,    57,    58,    59,
      -1,    -1,    62,    63,    -1,    -1,    66,    67,    -1,    -1,
      -1,    71,    72,    -1,    74,     3,     4,     5,     6,    -1,
       8,     9,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
      -1,    -1,    -1,     3,     4,     5,     6,    -1,     8,     9,
     100,   101,    -1,   103,    -1,    -1,    -1,    -1,    36,    37,
      -1,    -1,    -1,    -1,   114,    -1,   116,    -1,    -1,    -1,
      -1,    -1,    -1,    -1,    -1,    -1,    36,    37,    -1,    57,
      58,    59,    -1,    -1,    62,    63,    -1,    -1,    66,    67,
      -1,    -1,    -1,    71,    72,    -1,    74,    57,    58,    59,
      -1,    -1,    62,    63,    -1,    -1,    66,    67,    -1,    -1,
      -1,    71,    72,    -1,    74,    -1,    -1,    -1,    -1,    -1,
      -1,    -1,   100,   101,    -1,   103,    -1,    -1,    -1,    -1,
      -1,    -1,    -1,    -1,    -1,    -1,   114,    -1,   116,    -1,
     100,   101,    -1,   103,    -1,    -1,    -1,     1,    -1,    -1,
      -1,    -1,    -1,     7,   114,    -1,   116,    11,    12,    13,
      14,    15,    16,    17,    18,    19,    20,    21,    22,    23,
      24,    25,    26,    27,    28,    29,    30,    31,    32,    33,
      34,    35,     7,    -1,    -1,    -1,    11,    12,    13,    14,
      15,    16,    17,    18,    19,    20,    21,    22,    23,    24,
      25,    26,    27,    28,    29,    30,    31,    32,    33,    34,
      35,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
      -1,    75,    -1,    -1,    -1,    -1,    -1,    -1,    49,    50,
      51,    52,    53,    54,    55,    56,    57,    58,    59,    60,
      61,    -1,    63,    97,    65,    99,    -1,    -1,    69,    70,
      71,    72,    -1,    74,   108,    -1,    77,    -1,    -1,   113,
      -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
      -1,    -1,    97,    -1,    99,    -1,    -1,    -1,    -1,    -1,
      -1,    -1,    -1,   108,    -1,    -1,    -1,    -1,   113,    11,
      12,    13,    14,    15,    16,    17,    18,    19,    20,    21,
      22,    23,    24,    25,    26,    27,    28,    29,    30,    31,
      32,    33,    34,    35,    38,    39,    40,    41,    42,    43,
      44,    45,    46,    47,    48,    49,    50,    51,    52,    53,
      54,    55,    56,    57,    58,    59,    60,    61,    -1,    63,
      64,    65,    -1,    67,    68,    69,    70,    71,    72,    -1,
      74,    -1,    -1,    77,    78,    -1,    -1,    -1,    82,    83,
      -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
      -1,    -1,    -1,    -1,    -1,    97,    -1,    99,    -1,    -1,
      -1,    -1,    -1,    -1,    -1,    -1,   108,    -1,    -1,    -1,
      -1,   113,    38,    39,    40,    41,    42,    43,    44,    45,
      46,    47,    48,    49,    50,    51,    52,    53,    54,    55,
      56,    57,    58,    59,    60,    61,    -1,    63,    64,    65,
      -1,    67,    68,    69,    70,    71,    72,    -1,    74,    -1,
      -1,    77,    -1,    79,    -1,    -1,    82,    83,    38,    39,
      40,    41,    42,    43,    44,    45,    46,    47,    48,    49,
      50,    51,    52,    53,    54,    55,    56,    57,    58,    59,
      60,    61,    -1,    63,    64,    65,    -1,    67,    68,    69,
      70,    71,    72,    -1,    74,    75,    -1,    77,    -1,    -1,
      -1,    -1,    -1,    83,    38,    39,    40,    41,    42,    43,
      44,    45,    46,    47,    48,    49,    50,    51,    52,    53,
      54,    55,    56,    57,    58,    59,    60,    61,    -1,    63,
      64,    65,    -1,    67,    68,    69,    70,    71,    72,    -1,
      74,    -1,    -1,    77,    -1,    -1,    -1,    81,    -1,    83,
      38,    39,    40,    41,    42,    43,    44,    45,    46,    47,
      48,    49,    50,    51,    52,    53,    54,    55,    56,    57,
      58,    59,    60,    61,    -1,    63,    64,    65,    -1,    67,
      68,    69,    70,    71,    72,    73,    74,    -1,    -1,    77,
      -1,    -1,    -1,    -1,    -1,    83,    38,    39,    40,    41,
      42,    43,    44,    45,    46,    47,    48,    49,    50,    51,
      52,    53,    54,    55,    56,    57,    58,    59,    60,    61,
      -1,    63,    64,    65,    -1,    67,    68,    69,    70,    71,
      72,    -1,    74,    -1,    -1,    77,    -1,    -1,    -1,    81,
      -1,    83,    38,    39,    40,    41,    42,    43,    44,    45,
      46,    47,    48,    49,    50,    51,    52,    53,    54,    55,
      56,    57,    58,    59,    60,    61,    -1,    63,    64,    65,
      -1,    67,    68,    69,    70,    71,    72,    -1,    74,    75,
      -1,    77,    -1,    -1,    -1,    -1,    -1,    83,    38,    39,
      40,    41,    42,    43,    44,    45,    46,    47,    48,    49,
      50,    51,    52,    53,    54,    55,    56,    57,    58,    59,
      60,    61,    -1,    63,    64,    65,    -1,    67,    68,    69,
      70,    71,    72,    -1,    74,    -1,    -1,    77,    78,    -1,
      -1,    -1,    -1,    83,    38,    39,    40,    41,    42,    43,
      44,    45,    46,    47,    48,    49,    50,    51,    52,    53,
      54,    55,    56,    57,    58,    59,    60,    61,    -1,    63,
      64,    65,    -1,    67,    68,    69,    70,    71,    72,    -1,
      74,    -1,    -1,    77,    -1,    79,    -1,    -1,    -1,    83,
      38,    39,    40,    41,    42,    43,    44,    45,    46,    47,
      48,    49,    50,    51,    52,    53,    54,    55,    56,    57,
      58,    59,    60,    61,    -1,    63,    64,    65,    -1,    67,
      68,    69,    70,    71,    72,    73,    74,    -1,    -1,    77,
      -1,    -1,    -1,    -1,    -1,    83,    38,    39,    40,    41,
      42,    43,    44,    45,    46,    47,    48,    49,    50,    51,
      52,    53,    54,    55,    56,    57,    58,    59,    60,    61,
      -1,    63,    64,    65,    -1,    67,    68,    69,    70,    71,
      72,    -1,    74,    -1,    -1,    77,    -1,    -1,    -1,    -1,
      -1,    83,    49,    50,    51,    52,    53,    54,    55,    56,
      57,    58,    59,    60,    61,    -1,    63,    64,    65,    -1,
      67,    68,    69,    70,    71,    72,    -1,    74,    -1,    -1,
      77,    -1,    -1,    -1,    -1,    -1,    83,    49,    50,    51,
      52,    53,    54,    55,    56,    57,    58,    59,    60,    61,
      -1,    63,    64,    65,    -1,    67,    -1,    69,    70,    71,
      72,    -1,    74,    -1,    -1,    77,    49,    50,    51,    52,
      53,    54,    55,    56,    57,    58,    59,    60,    61,    -1,
      63,    64,    65,    -1,    -1,    -1,    69,    70,    71,    72,
      -1,    74,    -1,    -1,    77
};
 
/* YYSTOS[STATE-NUM] -- The symbol kind of the accessing symbol of
   state STATE-NUM.  */
static const yytype_uint8 yystos[] =
{
       0,    80,   120,   121,   122,   123,   122,     0,    10,     3,
      98,   109,   111,   112,   124,   125,   172,   175,   176,   213,
     215,    74,   194,    74,    76,    76,     1,   122,    59,    80,
     173,   174,   191,   200,   206,   207,     7,    11,    12,    13,
      14,    15,    16,    17,    18,    19,    20,    21,    22,    23,
      24,    25,    26,    27,    28,    29,    30,    31,    32,    33,
      34,    35,    97,    99,   108,   113,   177,   180,   220,   214,
       3,   126,   203,   216,     8,   100,   101,   131,   133,   135,
     125,     3,     4,     5,     6,     9,    36,    37,    57,    58,
      59,    62,    63,    66,    67,    71,    72,    74,   103,   114,
     116,   129,   130,   131,   134,   149,    80,   218,   220,    80,
      81,    38,     3,     7,    74,   115,   127,   192,   201,    76,
     127,    76,   127,   177,   178,    76,   127,   178,   178,   178,
     178,   178,   178,    74,    74,   177,   179,   178,     1,    76,
     151,   153,    81,   203,   217,    74,   175,   195,   199,    73,
     135,    75,    74,   129,    74,   129,   129,   129,   129,   129,
     129,   129,     3,   129,   129,     1,   129,   146,   153,   175,
     208,    74,    74,    38,    39,    40,    41,    42,    43,    44,
      45,    46,    47,    48,    49,    50,    51,    52,    53,    54,
      55,    56,    57,    58,    59,    60,    61,    63,    64,    65,
      67,    68,    69,    70,    71,    72,    74,    75,    77,    83,
     150,     9,   135,   207,   218,   173,   191,   207,    76,   129,
     136,   218,    74,    74,    77,    98,   194,   219,   220,     3,
     189,   190,    76,   182,    76,   184,    76,   129,   208,     3,
     124,   152,    75,   203,    73,    73,   199,   191,   206,   207,
     209,    73,    81,   196,    80,     3,   208,   208,    73,    81,
      81,    73,    73,   207,   209,    73,   129,     3,   129,   129,
     129,   129,   129,   129,   129,   129,   129,   129,   129,   127,
     127,   129,   129,   129,   129,   129,   129,   129,   129,   129,
     129,   129,   129,   129,   129,   129,   129,   129,   129,     1,
     144,   146,     3,     1,   146,   145,   146,   192,     3,    50,
      77,   127,   136,   137,   138,   139,   141,   143,   191,     3,
     202,   218,    74,   193,   219,    38,    81,   128,   189,     1,
     175,   185,   181,   185,   183,    73,    73,    73,    75,   102,
     156,   175,   204,   204,    73,    74,   210,   212,   197,   198,
      76,    73,    73,   146,   146,    74,    76,   129,    81,    73,
      73,    76,    78,    78,    79,    74,   127,   129,    79,    75,
      81,    38,   140,   136,    73,    73,   203,     1,   146,   147,
     131,   195,   129,     1,   190,    75,   128,    80,    80,   186,
      75,   185,    75,   185,     3,   157,   154,     1,   191,   205,
      80,     1,   218,   218,    77,   194,    82,   199,   122,   218,
     138,   208,   129,   129,   141,   142,    78,    82,   138,   136,
      73,    78,    78,    73,    73,    75,   185,   185,    79,   187,
     188,   191,    75,    75,    81,    80,     1,     3,    80,    84,
      85,    86,    87,    88,    89,    90,    91,    92,    93,    94,
      98,   107,   109,   110,   146,   153,   155,   158,   159,   160,
     161,   162,   170,   172,   175,    81,    80,    73,   209,   147,
     211,   196,    75,    75,    73,    75,   142,   129,   204,   218,
     129,    80,    81,    79,   157,   156,   124,    79,    80,    80,
       3,    59,    80,   146,   163,   129,    79,   165,   166,   171,
      74,   148,    27,    31,   221,    74,    80,   158,   160,   161,
     160,   162,   155,   145,   168,   205,    82,   204,    73,    78,
     195,    78,   185,   187,   129,    80,    80,   146,    80,   148,
      79,    82,   148,   161,    74,     1,   146,   161,   221,   221,
      74,   131,    80,   172,    73,    80,   164,   129,   161,    91,
      73,    73,    95,   131,    73,   145,   145,   161,    79,   148,
     161,    79,   222,    80,    80,    80,   131,   223,   224,   225,
      73,   145,   145,    74,    79,   226,    81,    80,   167,    73,
       1,   129,   223,   225,    73,   169,    73,    73,    79,   227,
     161,   161,     8,   132,   228,    81,   228
};
 
/* YYR1[RULE-NUM] -- Symbol kind of the left-hand side of rule RULE-NUM.  */
static const yytype_uint8 yyr1[] =
{
       0,   119,   120,   121,   122,   123,   122,   122,   124,   125,
     125,   125,   125,   126,   125,   125,   125,   125,   127,   127,
     127,   128,   128,   129,   129,   129,   129,   129,   129,   129,
     129,   129,   129,   129,   129,   129,   129,   129,   129,   129,
     129,   129,   129,   129,   129,   129,   129,   129,   129,   129,
     129,   129,   129,   129,   129,   129,   129,   129,   129,   129,
     129,   129,   129,   129,   129,   129,   129,   129,   129,   129,
     129,   129,   129,   129,   129,   129,   129,   129,   129,   129,
     130,   130,   130,   130,   130,   130,   131,   132,   133,   133,
     134,   134,   134,   135,   135,   135,   136,   136,   137,   137,
     138,   138,   139,   139,   139,   140,   140,   141,   141,   141,
     142,   142,   143,   144,   144,   145,   145,   146,   146,   146,
     147,   147,   148,   148,   149,   149,   150,   150,   152,   151,
     153,   153,   154,   155,   155,   155,   155,   156,   156,   157,
     157,   158,   159,   159,   160,   160,   161,   161,   162,   162,
     162,   162,   162,   162,   163,   164,   162,   165,   162,   166,
     162,   167,   162,   168,   169,   162,   162,   162,   162,   162,
     162,   162,   162,   162,   162,   162,   162,   162,   162,   171,
     170,   172,   172,   173,   173,   174,   174,   176,   175,   177,
     177,   177,   177,   177,   177,   177,   177,   177,   177,   178,
     178,   179,   179,   180,   180,   180,   180,   180,   180,   180,
     180,   180,   180,   180,   180,   180,   181,   180,   182,   180,
     180,   183,   180,   184,   180,   180,   180,   180,   180,   180,
     180,   185,   185,   186,   185,   185,   187,   187,   188,   188,
     188,   189,   189,   189,   190,   190,   191,   192,   192,   192,
     192,   193,   192,   194,   195,   195,   196,   197,   196,   198,
     196,   199,   199,   199,   199,   200,   202,   201,   203,   203,
     204,   204,   204,   205,   205,   205,   206,   207,   207,   208,
     208,   209,   209,   210,   210,   210,   211,   210,   212,   212,
     214,   213,   215,   215,   216,   215,   217,   215,   218,   218,
     219,   219,   219,   220,   220,   220,   220,   220,   221,   221,
     221,   222,   222,   223,   223,   224,   224,   225,   225,   226,
     226,   227,   227,   228,   228
};
 
/* YYR2[RULE-NUM] -- Number of symbols on the right-hand side of rule RULE-NUM.  */
static const yytype_int8 yyr2[] =
{
       0,     2,     2,     1,     0,     0,     3,     2,     0,     1,
       1,     5,     1,     0,     7,     8,     8,     3,     1,     1,
       4,     0,     1,     1,     1,     2,     4,     2,     4,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     3,
       3,     3,     1,     4,     6,     2,     5,     3,     3,     3,
       3,     3,     3,     3,     3,     3,     3,     3,     3,     3,
       3,     3,     3,     3,     3,     3,     3,     3,     3,     3,
       3,     3,     3,     3,     3,     3,     4,     6,     2,     4,
       1,     1,     1,     1,     1,     1,     1,     1,     1,     2,
       1,     2,     2,     1,     1,     1,     1,     3,     1,     3,
       0,     1,     3,     2,     1,     1,     0,     3,     4,     5,
       0,     1,     2,     0,     1,     0,     1,     1,     3,     3,
       0,     1,     3,     3,     3,     3,     3,     3,     0,     5,
       2,     3,     0,     0,     1,     2,     1,     0,     4,     1,
       3,     2,     4,     1,     1,     2,     2,     1,     1,     2,
       1,     1,     3,     5,     0,     0,     5,     0,     4,     0,
       6,     0,     9,     0,     0,     9,     2,     3,     5,     2,
       2,     3,     2,     2,     3,     4,     7,     1,     3,     0,
       3,     3,     2,     1,     3,     1,     3,     0,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     4,     0,
       1,     0,     1,     1,     1,     1,     1,     1,     1,     1,
       1,     1,     1,     1,     1,     2,     0,     6,     0,     5,
       2,     0,     6,     0,     5,     2,     6,     5,     1,     4,
       4,     0,     3,     0,     5,     3,     1,     3,     1,     3,
       2,     1,     3,     3,     1,     3,     3,     1,     4,     5,
       5,     0,     5,     1,     0,     2,     0,     0,     3,     0,
       4,     2,     2,     1,     3,     2,     0,     6,     1,     3,
       0,     4,     4,     1,     3,     1,     3,     0,     1,     2,
       1,     3,     1,     4,     3,     4,     0,     5,     1,     0,
       0,     3,     2,     2,     0,     5,     0,     6,     0,     2,
       0,     2,     5,     1,     1,     1,     1,     1,     0,     2,
       2,     0,     3,     0,     1,     1,     3,     4,     4,     0,
       3,     0,     2,     1,     3
};
 
 
enum { YYENOMEM = -2 };
 
#define yyerrok         (yyerrstatus = 0)
#define yyclearin       (yychar = YYEMPTY)
 
#define YYACCEPT        goto yyacceptlab
#define YYABORT         goto yyabortlab
#define YYERROR         goto yyerrorlab
#define YYNOMEM         goto yyexhaustedlab
 
 
#define YYRECOVERING()  (!!yyerrstatus)
 
#define YYBACKUP(Token, Value)                                    \
  do                                                              \
    if (yychar == YYEMPTY)                                        \
      {                                                           \
        yychar = (Token);                                         \
        yylval = (Value);                                         \
        YYPOPSTACK (yylen);                                       \
        yystate = *yyssp;                                         \
        goto yybackup;                                            \
      }                                                           \
    else                                                          \
      {                                                           \
        yyerror (YY_("syntax error: cannot back up")); \
        YYERROR;                                                  \
      }                                                           \
  while (0)
 
/* Backward compatibility with an undocumented macro.
   Use YYerror or YYUNDEF. */
#define YYERRCODE YYUNDEF
 
 
/* Enable debugging if requested.  */
#if YYDEBUG
 
# ifndef YYFPRINTF
#  include <stdio.h> /* INFRINGES ON USER NAME SPACE */
#  define YYFPRINTF fprintf
# endif
 
# define YYDPRINTF(Args)                        \
do {                                            \
  if (yydebug)                                  \
    YYFPRINTF Args;                             \
} while (0)
 
 
 
 
# define YY_SYMBOL_PRINT(Title, Kind, Value, Location)                    \
do {                                                                      \
  if (yydebug)                                                            \
    {                                                                     \
      YYFPRINTF (stderr, "%s ", Title);                                   \
      yy_symbol_print (stderr,                                            \
                  Kind, Value); \
      YYFPRINTF (stderr, "\n");                                           \
    }                                                                     \
} while (0)
 
 
/*-----------------------------------.
| Print this symbol's value on YYO.  |
`-----------------------------------*/
 
static void
yy_symbol_value_print (FILE *yyo,
                       yysymbol_kind_t yykind, YYSTYPE const * const yyvaluep)
{
  FILE *yyoutput = yyo;
  YY_USE (yyoutput);
  if (!yyvaluep)
    return;
  YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN
  YY_USE (yykind);
  YY_IGNORE_MAYBE_UNINITIALIZED_END
}
 
 
/*---------------------------.
| Print this symbol on YYO.  |
`---------------------------*/
 
static void
yy_symbol_print (FILE *yyo,
                 yysymbol_kind_t yykind, YYSTYPE const * const yyvaluep)
{
  YYFPRINTF (yyo, "%s %s (",
             yykind < YYNTOKENS ? "token" : "nterm", yysymbol_name (yykind));
 
  yy_symbol_value_print (yyo, yykind, yyvaluep);
  YYFPRINTF (yyo, ")");
}
 
/*------------------------------------------------------------------.
| yy_stack_print -- Print the state stack from its BOTTOM up to its |
| TOP (included).                                                   |
`------------------------------------------------------------------*/
 
static void
yy_stack_print (yy_state_t *yybottom, yy_state_t *yytop)
{
  YYFPRINTF (stderr, "Stack now");
  for (; yybottom <= yytop; yybottom++)
    {
      int yybot = *yybottom;
      YYFPRINTF (stderr, " %d", yybot);
    }
  YYFPRINTF (stderr, "\n");
}
 
# define YY_STACK_PRINT(Bottom, Top)                            \
do {                                                            \
  if (yydebug)                                                  \
    yy_stack_print ((Bottom), (Top));                           \
} while (0)
 
 
/*------------------------------------------------.
| Report that the YYRULE is going to be reduced.  |
`------------------------------------------------*/
 
static void
yy_reduce_print (yy_state_t *yyssp, YYSTYPE *yyvsp,
                 int yyrule)
{
  int yylno = yyrline[yyrule];
  int yynrhs = yyr2[yyrule];
  int yyi;
  YYFPRINTF (stderr, "Reducing stack by rule %d (line %d):\n",
             yyrule - 1, yylno);
  /* The symbols being reduced.  */
  for (yyi = 0; yyi < yynrhs; yyi++)
    {
      YYFPRINTF (stderr, "   $%d = ", yyi + 1);
      yy_symbol_print (stderr,
                       YY_ACCESSING_SYMBOL (+yyssp[yyi + 1 - yynrhs]),
                       &yyvsp[(yyi + 1) - (yynrhs)]);
      YYFPRINTF (stderr, "\n");
    }
}
 
# define YY_REDUCE_PRINT(Rule)          \
do {                                    \
  if (yydebug)                          \
    yy_reduce_print (yyssp, yyvsp, Rule); \
} while (0)
 
/* Nonzero means print parse trace.  It is left uninitialized so that
   multiple parsers can coexist.  */
int yydebug;
#else /* !YYDEBUG */
# define YYDPRINTF(Args) ((void) 0)
# define YY_SYMBOL_PRINT(Title, Kind, Value, Location)
# define YY_STACK_PRINT(Bottom, Top)
# define YY_REDUCE_PRINT(Rule)
#endif /* !YYDEBUG */
 
 
/* YYINITDEPTH -- initial size of the parser's stacks.  */
#ifndef YYINITDEPTH
# define YYINITDEPTH 200
#endif
 
/* YYMAXDEPTH -- maximum size the stacks can grow to (effective only
   if the built-in stack extension method is used).
 
   Do not make this value too large; the results are undefined if
   YYSTACK_ALLOC_MAXIMUM < YYSTACK_BYTES (YYMAXDEPTH)
   evaluated with infinite-precision integer arithmetic.  */
 
#ifndef YYMAXDEPTH
# define YYMAXDEPTH 10000
#endif
 
 
 
 
 
 
/*-----------------------------------------------.
| Release the memory associated to this symbol.  |
`-----------------------------------------------*/
 
static void
yydestruct (const char *yymsg,
            yysymbol_kind_t yykind, YYSTYPE *yyvaluep)
{
  YY_USE (yyvaluep);
  if (!yymsg)
    yymsg = "Deleting";
  YY_SYMBOL_PRINT (yymsg, yykind, yyvaluep, yylocationp);
 
  YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN
  YY_USE (yykind);
  YY_IGNORE_MAYBE_UNINITIALIZED_END
}
 
 
/* Lookahead token kind.  */
int yychar;
 
/* The semantic value of the lookahead symbol.  */
YYSTYPE yylval;
/* Number of syntax errors so far.  */
int yynerrs;
 
 
 
 
/*----------.
| yyparse.  |
`----------*/
 
int
yyparse (void)
{
    yy_state_fast_t yystate = 0;
    /* Number of tokens to shift before error messages enabled.  */
    int yyerrstatus = 0;
 
    /* Refer to the stacks through separate pointers, to allow yyoverflow
       to reallocate them elsewhere.  */
 
    /* Their size.  */
    YYPTRDIFF_T yystacksize = YYINITDEPTH;
 
    /* The state stack: array, bottom, top.  */
    yy_state_t yyssa[YYINITDEPTH];
    yy_state_t *yyss = yyssa;
    yy_state_t *yyssp = yyss;
 
    /* The semantic value stack: array, bottom, top.  */
    YYSTYPE yyvsa[YYINITDEPTH];
    YYSTYPE *yyvs = yyvsa;
    YYSTYPE *yyvsp = yyvs;
 
  int yyn;
  /* The return value of yyparse.  */
  int yyresult;
  /* Lookahead symbol kind.  */
  yysymbol_kind_t yytoken = YYSYMBOL_YYEMPTY;
  /* The variables used to return semantic value and location from the
     action routines.  */
  YYSTYPE yyval;
 
 
 
#define YYPOPSTACK(N)   (yyvsp -= (N), yyssp -= (N))
 
  /* The number of symbols on the RHS of the reduced rule.
     Keep to zero when no symbol should be popped.  */
  int yylen = 0;
 
  YYDPRINTF ((stderr, "Starting parse\n"));
 
  yychar = YYEMPTY; /* Cause a token to be read.  */
 
  goto yysetstate;
 
 
/*------------------------------------------------------------.
| yynewstate -- push a new state, which is found in yystate.  |
`------------------------------------------------------------*/
yynewstate:
  /* In all cases, when you get here, the value and location stacks
     have just been pushed.  So pushing a state here evens the stacks.  */
  yyssp++;
 
 
/*--------------------------------------------------------------------.
| yysetstate -- set current state (the top of the stack) to yystate.  |
`--------------------------------------------------------------------*/
yysetstate:
  YYDPRINTF ((stderr, "Entering state %d\n", yystate));
  YY_ASSERT (0 <= yystate && yystate < YYNSTATES);
  YY_IGNORE_USELESS_CAST_BEGIN
  *yyssp = YY_CAST (yy_state_t, yystate);
  YY_IGNORE_USELESS_CAST_END
  YY_STACK_PRINT (yyss, yyssp);
 
  if (yyss + yystacksize - 1 <= yyssp)
#if !defined yyoverflow && !defined YYSTACK_RELOCATE
    YYNOMEM;
#else
    {
      /* Get the current used size of the three stacks, in elements.  */
      YYPTRDIFF_T yysize = yyssp - yyss + 1;
 
# if defined yyoverflow
      {
        /* Give user a chance to reallocate the stack.  Use copies of
           these so that the &'s don't force the real ones into
           memory.  */
        yy_state_t *yyss1 = yyss;
        YYSTYPE *yyvs1 = yyvs;
 
        /* Each stack pointer address is followed by the size of the
           data in use in that stack, in bytes.  This used to be a
           conditional around just the two extra args, but that might
           be undefined if yyoverflow is a macro.  */
        yyoverflow (YY_("memory exhausted"),
                    &yyss1, yysize * YYSIZEOF (*yyssp),
                    &yyvs1, yysize * YYSIZEOF (*yyvsp),
                    &yystacksize);
        yyss = yyss1;
        yyvs = yyvs1;
      }
# else /* defined YYSTACK_RELOCATE */
      /* Extend the stack our own way.  */
      if (YYMAXDEPTH <= yystacksize)
        YYNOMEM;
      yystacksize *= 2;
      if (YYMAXDEPTH < yystacksize)
        yystacksize = YYMAXDEPTH;
 
      {
        yy_state_t *yyss1 = yyss;
        union yyalloc *yyptr =
          YY_CAST (union yyalloc *,
                   YYSTACK_ALLOC (YY_CAST (YYSIZE_T, YYSTACK_BYTES (yystacksize))));
        if (! yyptr)
          YYNOMEM;
        YYSTACK_RELOCATE (yyss_alloc, yyss);
        YYSTACK_RELOCATE (yyvs_alloc, yyvs);
#  undef YYSTACK_RELOCATE
        if (yyss1 != yyssa)
          YYSTACK_FREE (yyss1);
      }
# endif
 
      yyssp = yyss + yysize - 1;
      yyvsp = yyvs + yysize - 1;
 
      YY_IGNORE_USELESS_CAST_BEGIN
      YYDPRINTF ((stderr, "Stack size increased to %ld\n",
                  YY_CAST (long, yystacksize)));
      YY_IGNORE_USELESS_CAST_END
 
      if (yyss + yystacksize - 1 <= yyssp)
        YYABORT;
    }
#endif /* !defined yyoverflow && !defined YYSTACK_RELOCATE */
 
 
  if (yystate == YYFINAL)
    YYACCEPT;
 
  goto yybackup;
 
 
/*-----------.
| yybackup.  |
`-----------*/
yybackup:
  /* Do appropriate processing given the current state.  Read a
     lookahead token if we need one and don't already have one.  */
 
  /* First try to decide what to do without reference to lookahead token.  */
  yyn = yypact[yystate];
  if (yypact_value_is_default (yyn))
    goto yydefault;
 
  /* Not known => get a lookahead token if don't already have one.  */
 
  /* YYCHAR is either empty, or end-of-input, or a valid lookahead.  */
  if (yychar == YYEMPTY)
    {
      YYDPRINTF ((stderr, "Reading a token\n"));
      yychar = yylex ();
    }
 
  if (yychar <= YYEOF)
    {
      yychar = YYEOF;
      yytoken = YYSYMBOL_YYEOF;
      YYDPRINTF ((stderr, "Now at end of input.\n"));
    }
  else if (yychar == YYerror)
    {
      /* The scanner already issued an error message, process directly
         to error recovery.  But do not keep the error token as
         lookahead, it is too special and may lead us to an endless
         loop in error recovery. */
      yychar = YYUNDEF;
      yytoken = YYSYMBOL_YYerror;
      goto yyerrlab1;
    }
  else
    {
      yytoken = YYTRANSLATE (yychar);
      YY_SYMBOL_PRINT ("Next token is", yytoken, &yylval, &yylloc);
    }
 
  /* If the proper action on seeing token YYTOKEN is to reduce or to
     detect an error, take that action.  */
  yyn += yytoken;
  if (yyn < 0 || YYLAST < yyn || yycheck[yyn] != yytoken)
    goto yydefault;
  yyn = yytable[yyn];
  if (yyn <= 0)
    {
      if (yytable_value_is_error (yyn))
        goto yyerrlab;
      yyn = -yyn;
      goto yyreduce;
    }
 
  /* Count tokens shifted since error; after three, turn off error
     status.  */
  if (yyerrstatus)
    yyerrstatus--;
 
  /* Shift the lookahead token.  */
  YY_SYMBOL_PRINT ("Shifting", yytoken, &yylval, &yylloc);
  yystate = yyn;
  YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN
  *++yyvsp = yylval;
  YY_IGNORE_MAYBE_UNINITIALIZED_END
 
  /* Discard the shifted token.  */
  yychar = YYEMPTY;
  goto yynewstate;
 
 
/*-----------------------------------------------------------.
| yydefault -- do the default action for the current state.  |
`-----------------------------------------------------------*/
yydefault:
  yyn = yydefact[yystate];
  if (yyn == 0)
    goto yyerrlab;
  goto yyreduce;
 
 
/*-----------------------------.
| yyreduce -- do a reduction.  |
`-----------------------------*/
yyreduce:
  /* yyn is the number of a rule to reduce with.  */
  yylen = yyr2[yyn];
 
  /* If YYLEN is nonzero, implement the default value of the action:
     '$$ = $1'.
 
     Otherwise, the following line sets YYVAL to garbage.
     This behavior is undocumented and Bison
     users should not rely upon it.  Assigning to YYVAL
     unconditionally makes the parser a bit smaller, and it avoids a
     GCC warning that YYVAL may be used uninitialized.  */
  yyval = yyvsp[1-yylen];
 
 
  YY_REDUCE_PRINT (yyn);
  switch (yyn)
    {
  case 2: /* interpret: file TK_EOF  */
#line 776 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {YYACCEPT;}
#line 2823 "cyacc.tab.c"
    break;
 
  case 3: /* file: globals  */
#line 778 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* To handle special case: compilation unit module */
                          list dsl = (yyvsp[0].liste);
                          list dl = statements_to_declarations(dsl);
 
                          pips_assert("Here, only continue statements are expected",
                                      continue_statements_p(dsl));
 
                          if (true /* dl != NIL*/) { /* A C file with comments only is OK */
                            if(!entity_undefined_p(get_current_module_entity())) {
                              if(!compilation_unit_p(get_current_module_name())) {
                                pips_assert("Each variable is declared once", gen_once_p(dl));
                                pips_internal_error("Compilation unit rule used for non"
                                                    " compilation unit %s\n",
                                                    get_current_module_name());
                              }
                              ifdebug(8) {
                                pips_debug(8, "Declaration list for compilation unit %s: ",
                                           get_current_module_name());
                                print_entities(dl);
                                pips_debug(8, "\n");
                              }
                              ModuleStatement = make_statement(entity_empty_label(),
                                                               STATEMENT_NUMBER_UNDEFINED,
                                                               STATEMENT_ORDERING_UNDEFINED,
                                                               string_undefined,
                                                               make_instruction_block(dsl),
                                                               dl, NULL, empty_extensions (), make_synchronization_none());
                              if(ENDP(dl)) {
                                pips_user_warning("ISO C forbids an empty source file\n");
                              }
                            }
                          }
                        }
#line 2862 "cyacc.tab.c"
    break;
 
  case 4: /* globals: %empty  */
#line 815 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { (yyval.liste) = NIL; }
#line 2868 "cyacc.tab.c"
    break;
 
  case 5: /* $@1: %empty  */
#line 816 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
    {is_external = true; }
#line 2874 "cyacc.tab.c"
    break;
 
  case 6: /* globals: $@1 global globals  */
#line 817 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          list dsl = (yyvsp[0].liste);
                          list gdsl = (yyvsp[-1].liste);
 
                          /* PRAGMA */
                          if(!ENDP(dsl) && gen_length(gdsl)==1)
                            {
                              statement stmt = STATEMENT(CAR(dsl));
                              statement stmt_pragma = STATEMENT(CAR(gdsl));
                              list exs = extensions_extension(statement_extensions(stmt_pragma));
                              if (!ENDP(exs))
                              {
                                extensions_extension(statement_extensions(stmt)) = gen_nconc(exs, extensions_extension(statement_extensions(stmt)));
                                extensions_extension(statement_extensions(stmt_pragma)) = NIL;
                                gen_full_free_list(gdsl);
                                gdsl = NIL;
                              }
                            }
 
                                ifdebug(1) { // the successive calls to statements_to_declarations are too costly, so I only activate the test upond debug(1)
                                  list dl = statements_to_declarations(dsl);
                                  /* Each variable should be declared only
                                         once. Type and initial value conflict
                                         should have been detected earlier. */
                                  if(!compilation_unit_p(get_current_module_name())) {
                                        pips_assert("Each variable is declared once", gen_once_p(dl));
                                  }
                                  ifdebug(9) {
                                        list gdl = statements_to_declarations(gdsl);
                                        fprintf(stderr, "New variables $2 (%p) are declared\n", gdl);
                                        print_entities(gdl);
                                        fprintf(stderr, "\n");
                                        fprintf(stderr, "*******Current declarations dl (%p) are: \n", dl);
                                        print_entities(dl);
                                        fprintf(stderr, "\n");
                                        gen_free_list(gdl);
                                  }
                                  gen_free_list(dl);
                                }
 
                          /* The order of declarations must be
                             preserved: a structure is declared before
                             it is used to declare a variable */
                          /*
                          $$ = NIL;
                          MAP(ENTITY, v, {
                            if(!gen_in_list_p(v, $3))
                              $$ = gen_nconc($$, CONS(ENTITY, v , NIL));}, $2);
                          $$ = gen_nconc($$, $3);
                          */
                          /* Redeclarations are possible in C as long as they are compatible */
                          /* It is assumed that compatibility is checked somewhere else... */
                          (yyval.liste) = gen_nconc(gdsl, dsl);
 
                          ifdebug(9) {
                            list udl = statements_to_declarations((yyval.liste));
                            fprintf(stderr, "*******Updated $$ declarations (%p) are: \n", (yyval.liste));
                            fprintf(stderr, "\n");
                            if(ENDP((yyval.liste)))
                              fprintf(stderr, "Empty list\n");
                            else
                              print_entities(udl);
                            fprintf(stderr, "\n");
                          }
 
                          if(!compilation_unit_p(get_current_module_name())) {
                            list udl = statements_to_declarations((yyval.liste));
                            pips_assert("Each variable is declared once", gen_once_p(udl));
                            entity m = get_current_module_entity();
                            if(strcmp(entity_local_name(m),"main")==0) {
                              type mt = entity_type(m);
                              if(type_functional_p(mt)) {
                                type rt = functional_result(type_functional(mt));
                                if(!scalar_integer_type_p(rt))
                                  /* Too late for line numbers, do not use c_parser_user_warning */
                                  c_parser_user_warning("The \"main\" function should return an int value\n");
                              }
                              else {
                                pips_internal_error("A function does not have a functional type\n");
                              }
                            }
                            ResetCurrentModule();
                          }
                        }
#line 2963 "cyacc.tab.c"
    break;
 
  case 7: /* globals: TK_SEMICOLON globals  */
#line 902 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          pips_assert("Declarations are unique", gen_once_p((yyvsp[0].liste)));
                          ifdebug(8) {
                            list udl = statements_to_declarations((yyvsp[0].liste));
                            fprintf(stderr, "*******Current declarations are: \n");
                            print_entities(udl);
                            fprintf(stderr, "\n");
                          }
                          (yyval.liste) = (yyvsp[0].liste);
                        }
#line 2978 "cyacc.tab.c"
    break;
 
  case 8: /* location: %empty  */
#line 915 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {}
#line 2984 "cyacc.tab.c"
    break;
 
  case 9: /* global: declaration  */
#line 919 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {pips_debug(1, "Reduction %d: declaration -> global\n", __LINE__); /* discard_C_comment();*/  /* fprintf(stderr, "declaration\n");*/ declaration_counter++; }
#line 2990 "cyacc.tab.c"
    break;
 
  case 10: /* global: function_def  */
#line 920 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { (yyval.liste) = NIL;}
#line 2996 "cyacc.tab.c"
    break;
 
  case 11: /* global: TK_ASM TK_LPAREN string_constant TK_RPAREN TK_SEMICOLON  */
#line 922 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          CParserError("ASM not implemented\n");
                          (yyval.liste) = NIL;
                        }
#line 3005 "cyacc.tab.c"
    break;
 
  case 12: /* global: TK_PRAGMA  */
#line 927 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /*
                          CParserError("PRAGMA not implemented at top level\n");
                          $$ = NIL;
                          */
                          statement s = make_continue_statement(entity_empty_label());
                          add_pragma_str_to_statement(s, (yyvsp[0].string), true);
                          (yyval.liste) = CONS(STATEMENT, s, NIL);
                        }
#line 3019 "cyacc.tab.c"
    break;
 
  case 13: /* $@2: %empty  */
#line 940 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          entity oe = FindOrCreateEntity(TOP_LEVEL_MODULE_NAME,(yyvsp[-1].string));
                          free((yyvsp[-1].string));
                          entity e = oe; //RenameFunctionEntity(oe);
                          pips_debug(2,"Create function %s with old-style function prototype\n",(yyvsp[-1].string));
                          if (storage_undefined_p(entity_storage(e))) {
                            //entity_storage(e) = make_storage_return(e);
                            entity_storage(e) = make_storage_rom();
                          }
                          if (value_undefined_p(entity_initial(e)))
                            entity_initial(e) = make_value(is_value_code,make_code(NIL,strdup(""),make_sequence(NIL),NIL, make_language_c()));
                          //pips_assert("e is a module", module_name_p(entity_module_name(e)));
                          else
                            CCleanLocalEntities(oe);
                          PushFunction(e);
                          stack_push((char *) make_basic_logical(true),FormalStack);
                          stack_push((char *) make_basic_int(1),OffsetStack);
                          // FI: commented out while looking for
                          //declaration comments
                          //discard_C_comment();
                        }
#line 3045 "cyacc.tab.c"
    break;
 
  case 14: /* global: TK_IDENT TK_LPAREN $@2 old_parameter_list_ne TK_RPAREN old_pardef_list TK_SEMICOLON  */
#line 962 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          entity e = GetFunction();
                          if (type_undefined_p(entity_type(e)))
                            {
                              list paras = MakeParameterList((yyvsp[-3].liste),(yyvsp[-1].liste),FunctionStack);
                              functional f = make_functional(paras,make_type_unknown());
                              entity_type(e) = make_type_functional(f);
                            }
                          pips_assert("Current function entity is consistent",entity_consistent_p(e));
                          PopFunction();
                          stack_pop(FormalStack);
                          StackPop(OffsetStack);
                          gen_free_list((yyvsp[-3].liste));
                          (yyval.liste) = NIL;
                          // FI: commented out while trying to
                          //retrieve all comments
                          //discard_C_comment();
                        }
#line 3068 "cyacc.tab.c"
    break;
 
  case 15: /* global: TK_AT_TRANSFORM TK_LBRACE global TK_RBRACE TK_IDENT TK_LBRACE globals TK_RBRACE  */
#line 1007 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          CParserError("CIL AT not implemented\n");
                          (yyval.liste) = NIL;
                        }
#line 3077 "cyacc.tab.c"
    break;
 
  case 16: /* global: TK_AT_TRANSFORMEXPR TK_LBRACE expression TK_RBRACE TK_IDENT TK_LBRACE expression TK_RBRACE  */
#line 1013 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          CParserError("CIL AT not implemented\n");
                          (yyval.liste) = NIL;
                        }
#line 3086 "cyacc.tab.c"
    break;
 
  case 17: /* global: location error TK_SEMICOLON  */
#line 1018 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          CParserError("Parse error: location error TK_SEMICOLON \n");
                          (yyval.liste) = NIL;
                        }
#line 3095 "cyacc.tab.c"
    break;
 
  case 18: /* id_or_typename: TK_IDENT  */
#line 1026 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {}
#line 3101 "cyacc.tab.c"
    break;
 
  case 19: /* id_or_typename: TK_NAMED_TYPE  */
#line 1028 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {}
#line 3107 "cyacc.tab.c"
    break;
 
  case 20: /* id_or_typename: TK_AT_NAME TK_LPAREN TK_IDENT TK_RPAREN  */
#line 1030 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                           CParserError("CIL AT not implemented\n");
                        }
#line 3115 "cyacc.tab.c"
    break;
 
  case 23: /* expression: constant  */
#line 1044 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeNullaryCall((yyvsp[0].entity));
                        }
#line 3123 "cyacc.tab.c"
    break;
 
  case 24: /* expression: TK_IDENT  */
#line 1048 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* Create the expression corresponding to this identifier */
                          (yyval.expression) = IdentifierToExpression((yyvsp[0].string));
                          free((yyvsp[0].string));
                        }
#line 3133 "cyacc.tab.c"
    break;
 
  case 25: /* expression: TK_SIZEOF expression  */
#line 1054 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeSizeofExpression((yyvsp[0].expression));
                        }
#line 3141 "cyacc.tab.c"
    break;
 
  case 26: /* expression: TK_SIZEOF TK_LPAREN type_name TK_RPAREN  */
#line 1058 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeSizeofType((yyvsp[-1].type));
                        }
#line 3149 "cyacc.tab.c"
    break;
 
  case 27: /* expression: TK_ALIGNOF expression  */
#line 1062 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          CParserError("ALIGNOF not implemented\n");
                        }
#line 3157 "cyacc.tab.c"
    break;
 
  case 28: /* expression: TK_ALIGNOF TK_LPAREN type_name TK_RPAREN  */
#line 1066 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          CParserError("ALIGNOF not implemented\n");
                        }
#line 3165 "cyacc.tab.c"
    break;
 
  case 29: /* expression: TK_PLUS expression  */
#line 1070 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeUnaryCall(CreateIntrinsic(UNARY_PLUS_OPERATOR_NAME), (yyvsp[0].expression));
                        }
#line 3173 "cyacc.tab.c"
    break;
 
  case 30: /* expression: TK_MINUS expression  */
#line 1074 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeUnaryCall(CreateIntrinsic(UNARY_MINUS_OPERATOR_NAME), (yyvsp[0].expression));
                        }
#line 3181 "cyacc.tab.c"
    break;
 
  case 31: /* expression: TK_STAR expression  */
#line 1078 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeUnaryCall(CreateIntrinsic(DEREFERENCING_OPERATOR_NAME), (yyvsp[0].expression));
                        }
#line 3189 "cyacc.tab.c"
    break;
 
  case 32: /* expression: TK_AND expression  */
#line 1082 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeUnaryCall(CreateIntrinsic(ADDRESS_OF_OPERATOR_NAME), (yyvsp[0].expression));
                        }
#line 3197 "cyacc.tab.c"
    break;
 
  case 33: /* expression: TK_EXCLAM expression  */
#line 1086 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeUnaryCall(CreateIntrinsic(C_NOT_OPERATOR_NAME), (yyvsp[0].expression));
                        }
#line 3205 "cyacc.tab.c"
    break;
 
  case 34: /* expression: TK_TILDE expression  */
#line 1090 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeUnaryCall(CreateIntrinsic(BITWISE_NOT_OPERATOR_NAME), (yyvsp[0].expression));
                        }
#line 3213 "cyacc.tab.c"
    break;
 
  case 35: /* expression: TK_PLUS_PLUS expression  */
#line 1094 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeUnaryCall(CreateIntrinsic(PRE_INCREMENT_OPERATOR_NAME), (yyvsp[0].expression));
                        }
#line 3221 "cyacc.tab.c"
    break;
 
  case 36: /* expression: expression TK_PLUS_PLUS  */
#line 1098 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeUnaryCall(CreateIntrinsic(POST_INCREMENT_OPERATOR_NAME), (yyvsp[-1].expression));
                        }
#line 3229 "cyacc.tab.c"
    break;
 
  case 37: /* expression: TK_MINUS_MINUS expression  */
#line 1102 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeUnaryCall(CreateIntrinsic(PRE_DECREMENT_OPERATOR_NAME), (yyvsp[0].expression));
                        }
#line 3237 "cyacc.tab.c"
    break;
 
  case 38: /* expression: expression TK_MINUS_MINUS  */
#line 1106 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeUnaryCall(CreateIntrinsic(POST_DECREMENT_OPERATOR_NAME), (yyvsp[-1].expression));
                        }
#line 3245 "cyacc.tab.c"
    break;
 
  case 39: /* expression: expression TK_ARROW id_or_typename  */
#line 1110 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* Find the struct/union type of the expression
                             then the struct/union member entity and transform it to expression */
                          expression exp = MemberIdentifierToExpression((yyvsp[-2].expression),(yyvsp[0].string));
                          (yyval.expression) = MakeBinaryCall(CreateIntrinsic(POINT_TO_OPERATOR_NAME),(yyvsp[-2].expression),exp);
                        }
#line 3256 "cyacc.tab.c"
    break;
 
  case 40: /* expression: expression TK_DOT id_or_typename  */
#line 1117 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          expression exp = MemberIdentifierToExpression((yyvsp[-2].expression),(yyvsp[0].string));
                          (yyval.expression) = MakeBinaryCall(CreateIntrinsic(FIELD_OPERATOR_NAME),(yyvsp[-2].expression),exp);
                        }
#line 3265 "cyacc.tab.c"
    break;
 
  case 41: /* expression: TK_LPAREN block TK_RPAREN  */
#line 1122 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          CParserError("GNU extension not implemented\n");
                        }
#line 3273 "cyacc.tab.c"
    break;
 
  case 42: /* expression: paren_comma_expression  */
#line 1126 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          if(false) {
                          char * ccc = pop_current_C_comment();
                          if(!empty_comments_p(ccc)) {
                            bool fullspace=true;
                            for(const char *iter=ccc;*iter;++iter)
                              if(!(fullspace=(isspace(*iter)&&*iter!='\n')))
                                break;
                            if(fullspace)
                              free(ccc);
                            else {
                              /* paren_comma_expression is a list of
                                 expressions, maybe reduced to one */
                              if(empty_comments_p(expression_comment))
                                expression_comment=ccc;
                              else {
                                char *tmp = expression_comment;
                                asprintf(&expression_comment,"%s%s",expression_comment, ccc);
                                free(tmp);
                              }
                            }
                          }
                          expression_line_number = pop_current_C_line_number();
                          }
                          (yyval.expression) = MakeCommaExpression((yyvsp[0].liste));
                        }
#line 3304 "cyacc.tab.c"
    break;
 
  case 43: /* expression: expression TK_LPAREN arguments TK_RPAREN  */
#line 1153 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeFunctionExpression((yyvsp[-3].expression),(yyvsp[-1].liste));
                        }
#line 3312 "cyacc.tab.c"
    break;
 
  case 44: /* expression: TK_BUILTIN_VA_ARG TK_LPAREN expression TK_COMMA type_name TK_RPAREN  */
#line 1157 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
 
                          expression e = (yyvsp[-3].expression);
                          type t = (yyvsp[-1].type);
                          sizeofexpression e1 = make_sizeofexpression_expression(e);
                          sizeofexpression e2 = make_sizeofexpression_type(t);
                          list l = CONS(SIZEOFEXPRESSION, e1,
                                        CONS(SIZEOFEXPRESSION, e2, NIL));
                          syntax s = make_syntax_va_arg(l);
                          expression r = make_expression(s, make_normalized_complex());
 
                          (yyval.expression) = r;
                          //CParserError("BUILTIN_VA_ARG not implemented\n");
                        }
#line 3331 "cyacc.tab.c"
    break;
 
  case 45: /* expression: expression bracket_comma_expression  */
#line 1172 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeArrayExpression((yyvsp[-1].expression),(yyvsp[0].liste));
                        }
#line 3339 "cyacc.tab.c"
    break;
 
  case 46: /* expression: expression TK_QUEST opt_expression TK_COLON expression  */
#line 1176 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeTernaryCall(CreateIntrinsic(CONDITIONAL_OPERATOR_NAME), (yyvsp[-4].expression), (yyvsp[-2].expression), (yyvsp[0].expression));
                        }
#line 3347 "cyacc.tab.c"
    break;
 
  case 47: /* expression: expression TK_PLUS expression  */
#line 1180 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeBinaryCall(CreateIntrinsic(PLUS_C_OPERATOR_NAME), (yyvsp[-2].expression), (yyvsp[0].expression));
                        }
#line 3355 "cyacc.tab.c"
    break;
 
  case 48: /* expression: expression TK_MINUS expression  */
#line 1184 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeBinaryCall(CreateIntrinsic(MINUS_C_OPERATOR_NAME), (yyvsp[-2].expression), (yyvsp[0].expression));
                        }
#line 3363 "cyacc.tab.c"
    break;
 
  case 49: /* expression: expression TK_STAR expression  */
#line 1188 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeBinaryCall(CreateIntrinsic(MULTIPLY_OPERATOR_NAME), (yyvsp[-2].expression), (yyvsp[0].expression));
                        }
#line 3371 "cyacc.tab.c"
    break;
 
  case 50: /* expression: expression TK_SLASH expression  */
#line 1192 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeBinaryCall(CreateIntrinsic(DIVIDE_OPERATOR_NAME), (yyvsp[-2].expression), (yyvsp[0].expression));
                        }
#line 3379 "cyacc.tab.c"
    break;
 
  case 51: /* expression: expression TK_PERCENT expression  */
#line 1196 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeBinaryCall(CreateIntrinsic(C_MODULO_OPERATOR_NAME), (yyvsp[-2].expression), (yyvsp[0].expression));
                        }
#line 3387 "cyacc.tab.c"
    break;
 
  case 52: /* expression: expression TK_AND_AND expression  */
#line 1200 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeBinaryCall(CreateIntrinsic(C_AND_OPERATOR_NAME), (yyvsp[-2].expression), (yyvsp[0].expression));
                        }
#line 3395 "cyacc.tab.c"
    break;
 
  case 53: /* expression: expression TK_PIPE_PIPE expression  */
#line 1204 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeBinaryCall(CreateIntrinsic(C_OR_OPERATOR_NAME), (yyvsp[-2].expression), (yyvsp[0].expression));
                        }
#line 3403 "cyacc.tab.c"
    break;
 
  case 54: /* expression: expression TK_AND expression  */
#line 1208 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeBinaryCall(CreateIntrinsic(BITWISE_AND_OPERATOR_NAME), (yyvsp[-2].expression), (yyvsp[0].expression));
                        }
#line 3411 "cyacc.tab.c"
    break;
 
  case 55: /* expression: expression TK_PIPE expression  */
#line 1212 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeBinaryCall(CreateIntrinsic(BITWISE_OR_OPERATOR_NAME), (yyvsp[-2].expression), (yyvsp[0].expression));
                        }
#line 3419 "cyacc.tab.c"
    break;
 
  case 56: /* expression: expression TK_CIRC expression  */
#line 1216 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeBinaryCall(CreateIntrinsic(BITWISE_XOR_OPERATOR_NAME), (yyvsp[-2].expression), (yyvsp[0].expression));
                        }
#line 3427 "cyacc.tab.c"
    break;
 
  case 57: /* expression: expression TK_EQ_EQ expression  */
#line 1220 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeBinaryCall(CreateIntrinsic(C_EQUAL_OPERATOR_NAME), (yyvsp[-2].expression), (yyvsp[0].expression));
                        }
#line 3435 "cyacc.tab.c"
    break;
 
  case 58: /* expression: expression TK_EXCLAM_EQ expression  */
#line 1224 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeBinaryCall(CreateIntrinsic(C_NON_EQUAL_OPERATOR_NAME), (yyvsp[-2].expression), (yyvsp[0].expression));
                        }
#line 3443 "cyacc.tab.c"
    break;
 
  case 59: /* expression: expression TK_INF expression  */
#line 1228 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeBinaryCall(CreateIntrinsic(C_LESS_THAN_OPERATOR_NAME), (yyvsp[-2].expression), (yyvsp[0].expression));
                        }
#line 3451 "cyacc.tab.c"
    break;
 
  case 60: /* expression: expression TK_SUP expression  */
#line 1232 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeBinaryCall(CreateIntrinsic(C_GREATER_THAN_OPERATOR_NAME), (yyvsp[-2].expression), (yyvsp[0].expression));
                        }
#line 3459 "cyacc.tab.c"
    break;
 
  case 61: /* expression: expression TK_INF_EQ expression  */
#line 1236 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeBinaryCall(CreateIntrinsic(C_LESS_OR_EQUAL_OPERATOR_NAME), (yyvsp[-2].expression), (yyvsp[0].expression));
                        }
#line 3467 "cyacc.tab.c"
    break;
 
  case 62: /* expression: expression TK_SUP_EQ expression  */
#line 1240 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeBinaryCall(CreateIntrinsic(C_GREATER_OR_EQUAL_OPERATOR_NAME), (yyvsp[-2].expression), (yyvsp[0].expression));
                        }
#line 3475 "cyacc.tab.c"
    break;
 
  case 63: /* expression: expression TK_INF_INF expression  */
#line 1244 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeBinaryCall(CreateIntrinsic(LEFT_SHIFT_OPERATOR_NAME), (yyvsp[-2].expression), (yyvsp[0].expression));
                        }
#line 3483 "cyacc.tab.c"
    break;
 
  case 64: /* expression: expression TK_SUP_SUP expression  */
#line 1248 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeBinaryCall(CreateIntrinsic(RIGHT_SHIFT_OPERATOR_NAME), (yyvsp[-2].expression), (yyvsp[0].expression));
                        }
#line 3491 "cyacc.tab.c"
    break;
 
  case 65: /* expression: expression TK_EQ expression  */
#line 1252 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          expression lhs = (yyvsp[-2].expression);
                          expression rhs = (yyvsp[0].expression);
                          /* Check the left hand side expression */
                          if(expression_reference_p(lhs)) {
                            reference r = expression_reference(lhs);
                            entity v = reference_variable(r);
                            type t = ultimate_type(entity_type(v));
                            if(type_functional_p(t)) {
                              c_parser_user_warning("Ill. left hand side reference to function \"%s\""
                                                " or variable \"%s\" not declared\n",
                                                entity_user_name(v), entity_user_name(v));
                              CParserError("Ill. left hand side expression");
                            }
                          }
                          (void) simplify_C_expression(rhs);
                          (yyval.expression) = make_assign_expression(lhs, rhs);
                        }
#line 3514 "cyacc.tab.c"
    break;
 
  case 66: /* expression: expression TK_PLUS_EQ expression  */
#line 1271 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (void) simplify_C_expression((yyvsp[0].expression));
                          (yyval.expression) = MakeBinaryCall(CreateIntrinsic(PLUS_UPDATE_OPERATOR_NAME), (yyvsp[-2].expression), (yyvsp[0].expression));
                        }
#line 3523 "cyacc.tab.c"
    break;
 
  case 67: /* expression: expression TK_MINUS_EQ expression  */
#line 1276 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (void) simplify_C_expression((yyvsp[0].expression));
                          (yyval.expression) = MakeBinaryCall(CreateIntrinsic(MINUS_UPDATE_OPERATOR_NAME), (yyvsp[-2].expression), (yyvsp[0].expression));
                        }
#line 3532 "cyacc.tab.c"
    break;
 
  case 68: /* expression: expression TK_STAR_EQ expression  */
#line 1281 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (void) simplify_C_expression((yyvsp[0].expression));
                          (yyval.expression) = MakeBinaryCall(CreateIntrinsic(MULTIPLY_UPDATE_OPERATOR_NAME), (yyvsp[-2].expression), (yyvsp[0].expression));
                        }
#line 3541 "cyacc.tab.c"
    break;
 
  case 69: /* expression: expression TK_SLASH_EQ expression  */
#line 1286 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (void) simplify_C_expression((yyvsp[0].expression));
                          (yyval.expression) = MakeBinaryCall(CreateIntrinsic(DIVIDE_UPDATE_OPERATOR_NAME), (yyvsp[-2].expression), (yyvsp[0].expression));
                        }
#line 3550 "cyacc.tab.c"
    break;
 
  case 70: /* expression: expression TK_PERCENT_EQ expression  */
#line 1291 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (void) simplify_C_expression((yyvsp[0].expression));
                          (yyval.expression) = MakeBinaryCall(CreateIntrinsic(MODULO_UPDATE_OPERATOR_NAME), (yyvsp[-2].expression), (yyvsp[0].expression));
                        }
#line 3559 "cyacc.tab.c"
    break;
 
  case 71: /* expression: expression TK_AND_EQ expression  */
#line 1296 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (void) simplify_C_expression((yyvsp[0].expression));
                          (yyval.expression) = MakeBinaryCall(CreateIntrinsic(BITWISE_AND_UPDATE_OPERATOR_NAME), (yyvsp[-2].expression), (yyvsp[0].expression));
                        }
#line 3568 "cyacc.tab.c"
    break;
 
  case 72: /* expression: expression TK_PIPE_EQ expression  */
#line 1301 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (void) simplify_C_expression((yyvsp[0].expression));
                          (yyval.expression) = MakeBinaryCall(CreateIntrinsic(BITWISE_OR_UPDATE_OPERATOR_NAME), (yyvsp[-2].expression), (yyvsp[0].expression));
                        }
#line 3577 "cyacc.tab.c"
    break;
 
  case 73: /* expression: expression TK_CIRC_EQ expression  */
#line 1306 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (void) simplify_C_expression((yyvsp[0].expression));
                          (yyval.expression) = MakeBinaryCall(CreateIntrinsic(BITWISE_XOR_UPDATE_OPERATOR_NAME), (yyvsp[-2].expression), (yyvsp[0].expression));
                        }
#line 3586 "cyacc.tab.c"
    break;
 
  case 74: /* expression: expression TK_INF_INF_EQ expression  */
#line 1311 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (void) simplify_C_expression((yyvsp[0].expression));
                          (yyval.expression) = MakeBinaryCall(CreateIntrinsic(LEFT_SHIFT_UPDATE_OPERATOR_NAME), (yyvsp[-2].expression), (yyvsp[0].expression));
                        }
#line 3595 "cyacc.tab.c"
    break;
 
  case 75: /* expression: expression TK_SUP_SUP_EQ expression  */
#line 1316 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (void) simplify_C_expression((yyvsp[0].expression));
                          (yyval.expression) = MakeBinaryCall(CreateIntrinsic(RIGHT_SHIFT_UPDATE_OPERATOR_NAME), (yyvsp[-2].expression), (yyvsp[0].expression));
                        }
#line 3604 "cyacc.tab.c"
    break;
 
  case 76: /* expression: TK_LPAREN type_name TK_RPAREN expression  */
#line 1321 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeCastExpression((yyvsp[-2].type),(yyvsp[0].expression));
                        }
#line 3612 "cyacc.tab.c"
    break;
 
  case 77: /* expression: TK_LPAREN type_name TK_RPAREN TK_LBRACE initializer_list_opt TK_RBRACE  */
#line 1326 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.expression) = MakeCastExpression((yyvsp[-4].type),MakeBraceExpression((yyvsp[-1].liste)));
                        }
#line 3620 "cyacc.tab.c"
    break;
 
  case 78: /* expression: TK_AND_AND TK_IDENT  */
#line 1331 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          CParserError("GCC's address of labels not implemented\n");
                        }
#line 3628 "cyacc.tab.c"
    break;
 
  case 79: /* expression: TK_AT_EXPR TK_LPAREN TK_IDENT TK_RPAREN  */
#line 1335 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          CParserError("GCC's address of labels not implemented\n");
                        }
#line 3636 "cyacc.tab.c"
    break;
 
  case 80: /* constant: TK_INTCON  */
#line 1342 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { // Do we know about the size? 2, 4 or 8 bytes?
                          (yyval.entity) = make_C_constant_entity((yyvsp[0].string), is_basic_int, 4);
                          free((yyvsp[0].string));
                        }
#line 3645 "cyacc.tab.c"
    break;
 
  case 81: /* constant: TK_FLOATCON  */
#line 1347 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.entity) = MakeConstant((yyvsp[0].string), is_basic_float);
                          free((yyvsp[0].string));
                        }
#line 3654 "cyacc.tab.c"
    break;
 
  case 82: /* constant: TK_COMPLEXCON  */
#line 1352 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* some work left to accomodate imaginary
                             constants */
                          (yyval.entity) = MakeConstant((yyvsp[0].string), is_basic_float);
                          free((yyvsp[0].string));
                        }
#line 3665 "cyacc.tab.c"
    break;
 
  case 83: /* constant: TK_CHARCON  */
#line 1359 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.entity) = make_C_constant_entity((yyvsp[0].string), is_basic_int, 1);
                          free((yyvsp[0].string));
                        }
#line 3674 "cyacc.tab.c"
    break;
 
  case 84: /* constant: string_constant  */
#line 1364 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* The size will be fixed later, hence 0 here. */
                          (yyval.entity) = make_C_constant_entity((yyvsp[0].string), is_basic_string, 0);
                          free((yyvsp[0].string));
                        }
#line 3684 "cyacc.tab.c"
    break;
 
  case 85: /* constant: wstring_list  */
#line 1372 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.entity) = MakeConstant(list_to_string((yyvsp[0].liste)),is_basic_string);
                          free((yyvsp[0].liste));
                        }
#line 3693 "cyacc.tab.c"
    break;
 
  case 86: /* string_constant: string_list  */
#line 1382 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* Hmmm... Looks like a memory leak on all the
                             strings... */
                          (yyval.string) = list_to_string(gen_nreverse((yyvsp[0].liste)));
                        }
#line 3703 "cyacc.tab.c"
    break;
 
  case 87: /* one_string_constant: TK_STRINGCON  */
#line 1391 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {}
#line 3709 "cyacc.tab.c"
    break;
 
  case 88: /* string_list: one_string  */
#line 1395 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.liste) = CONS(STRING,(yyvsp[0].string),NIL);
                        }
#line 3717 "cyacc.tab.c"
    break;
 
  case 89: /* string_list: string_list one_string  */
#line 1399 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.liste) = CONS(STRING,(yyvsp[0].string),(yyvsp[-1].liste));
                        }
#line 3725 "cyacc.tab.c"
    break;
 
  case 90: /* wstring_list: TK_WSTRINGCON  */
#line 1406 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.liste) = CONS(STRING,(yyvsp[0].string),NIL);
                        }
#line 3733 "cyacc.tab.c"
    break;
 
  case 91: /* wstring_list: wstring_list one_string  */
#line 1410 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.liste) = CONS(STRING,(yyvsp[0].string),(yyvsp[-1].liste));
                        }
#line 3741 "cyacc.tab.c"
    break;
 
  case 92: /* wstring_list: wstring_list TK_WSTRINGCON  */
#line 1414 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.liste) = gen_nconc((yyvsp[-1].liste),CONS(STRING,(yyvsp[0].string),NIL));
                        }
#line 3749 "cyacc.tab.c"
    break;
 
  case 93: /* one_string: TK_STRINGCON  */
#line 1421 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { }
#line 3755 "cyacc.tab.c"
    break;
 
  case 94: /* one_string: TK_FUNCTION__  */
#line 1423 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { CParserError("TK_FUNCTION not implemented\n"); }
#line 3761 "cyacc.tab.c"
    break;
 
  case 95: /* one_string: TK_PRETTY_FUNCTION__  */
#line 1425 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { CParserError("TK_PRETTY_FUNCTION not implemented\n"); }
#line 3767 "cyacc.tab.c"
    break;
 
  case 96: /* init_expression: expression  */
#line 1429 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          expression ie = (yyvsp[0].expression);
                          /* ifdebug(8) { */
                          /*   fprintf(stderr, "Initialization expression: "); */
                          /*   print_expression(ie); */
                          /*   fprintf(stderr, "\n"); */
                          /* } */
                          (yyval.expression) = ie;
                        }
#line 3781 "cyacc.tab.c"
    break;
 
  case 97: /* init_expression: TK_LBRACE initializer_list_opt TK_RBRACE  */
#line 1439 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* Deduce the size of an array by its initialization ?*/
                          (yyval.expression) = MakeBraceExpression((yyvsp[-1].liste));
                        }
#line 3790 "cyacc.tab.c"
    break;
 
  case 98: /* initializer_list: initializer  */
#line 1446 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.liste) = CONS(EXPRESSION,(yyvsp[0].expression),NIL);
                        }
#line 3798 "cyacc.tab.c"
    break;
 
  case 99: /* initializer_list: initializer TK_COMMA initializer_list_opt  */
#line 1450 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.liste) = CONS(EXPRESSION,(yyvsp[-2].expression),(yyvsp[0].liste));
                        }
#line 3806 "cyacc.tab.c"
    break;
 
  case 100: /* initializer_list_opt: %empty  */
#line 1455 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { (yyval.liste) = NIL; }
#line 3812 "cyacc.tab.c"
    break;
 
  case 101: /* initializer_list_opt: initializer_list  */
#line 1456 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { }
#line 3818 "cyacc.tab.c"
    break;
 
  case 102: /* initializer: init_designators eq_opt init_expression  */
#line 1460 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          CParserError("Complicated initialization not implemented\n");
                        }
#line 3826 "cyacc.tab.c"
    break;
 
  case 103: /* initializer: gcc_init_designators init_expression  */
#line 1464 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          CParserError("gcc init designators not implemented\n");
                        }
#line 3834 "cyacc.tab.c"
    break;
 
  case 104: /* initializer: init_expression  */
#line 1467 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { }
#line 3840 "cyacc.tab.c"
    break;
 
  case 105: /* eq_opt: TK_EQ  */
#line 1471 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { }
#line 3846 "cyacc.tab.c"
    break;
 
  case 106: /* eq_opt: %empty  */
#line 1474 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          CParserError("gcc missing = not implemented\n");
                        }
#line 3854 "cyacc.tab.c"
    break;
 
  case 107: /* init_designators: TK_DOT id_or_typename init_designators_opt  */
#line 1480 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { }
#line 3860 "cyacc.tab.c"
    break;
 
  case 108: /* init_designators: TK_LBRACKET expression TK_RBRACKET init_designators_opt  */
#line 1482 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { }
#line 3866 "cyacc.tab.c"
    break;
 
  case 109: /* init_designators: TK_LBRACKET expression TK_ELLIPSIS expression TK_RBRACKET  */
#line 1484 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { }
#line 3872 "cyacc.tab.c"
    break;
 
  case 110: /* init_designators_opt: %empty  */
#line 1487 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { (yyval.liste) = NIL; }
#line 3878 "cyacc.tab.c"
    break;
 
  case 111: /* init_designators_opt: init_designators  */
#line 1488 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {}
#line 3884 "cyacc.tab.c"
    break;
 
  case 112: /* gcc_init_designators: id_or_typename TK_COLON  */
#line 1493 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          CParserError("gcc init designators not implemented\n");
                        }
#line 3892 "cyacc.tab.c"
    break;
 
  case 113: /* arguments: %empty  */
#line 1499 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { (yyval.liste) = NIL; }
#line 3898 "cyacc.tab.c"
    break;
 
  case 114: /* arguments: comma_expression  */
#line 1500 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { }
#line 3904 "cyacc.tab.c"
    break;
 
  case 115: /* opt_expression: %empty  */
#line 1505 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { (yyval.expression) = expression_undefined; }
#line 3910 "cyacc.tab.c"
    break;
 
  case 116: /* opt_expression: comma_expression  */
#line 1508 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { (yyval.expression) = MakeCommaExpression((yyvsp[0].liste)); }
#line 3916 "cyacc.tab.c"
    break;
 
  case 117: /* comma_expression: expression  */
#line 1513 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          pips_debug(1, "Reduction %d: expression -> comma_expression\n", __LINE__);
                          (void) simplify_C_expression((yyvsp[0].expression));
                          (yyval.liste) = CONS(EXPRESSION,(yyvsp[0].expression),NIL);
                        }
#line 3926 "cyacc.tab.c"
    break;
 
  case 118: /* comma_expression: expression TK_COMMA comma_expression  */
#line 1519 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          pips_debug(1, "Reduction %d: expression TK_COMMA comma_expression -> comma_expression\n", __LINE__);
                          (void) simplify_C_expression((yyvsp[-2].expression));
                          (yyval.liste) = CONS(EXPRESSION,(yyvsp[-2].expression),(yyvsp[0].liste));
                        }
#line 3936 "cyacc.tab.c"
    break;
 
  case 119: /* comma_expression: error TK_COMMA comma_expression  */
#line 1525 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          CParserError("Parse error: error TK_COMMA comma_expression \n");
                        }
#line 3944 "cyacc.tab.c"
    break;
 
  case 120: /* comma_expression_opt: %empty  */
#line 1531 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { (yyval.liste) = NIL; }
#line 3950 "cyacc.tab.c"
    break;
 
  case 121: /* comma_expression_opt: comma_expression  */
#line 1532 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { }
#line 3956 "cyacc.tab.c"
    break;
 
  case 122: /* statement_paren_comma_expression: TK_LPAREN comma_expression TK_RPAREN  */
#line 1537 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          push_current_C_comment();
                          push_current_C_line_number();
                      save_expression_comment_as_statement_comment();
                          (yyval.liste) = (yyvsp[-1].liste);
                        }
#line 3967 "cyacc.tab.c"
    break;
 
  case 123: /* statement_paren_comma_expression: TK_LPAREN error TK_RPAREN  */
#line 1544 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          CParserError("Parse error: TK_LPAREN error TK_RPAREN \n");
                        }
#line 3975 "cyacc.tab.c"
    break;
 
  case 124: /* paren_comma_expression: TK_LPAREN comma_expression TK_RPAREN  */
#line 1550 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          if(false) {
                          push_current_C_comment();
                          push_current_C_line_number();
                          }
                          (yyval.liste) = (yyvsp[-1].liste);
                        }
#line 3987 "cyacc.tab.c"
    break;
 
  case 125: /* paren_comma_expression: TK_LPAREN error TK_RPAREN  */
#line 1558 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          CParserError("Parse error: TK_LPAREN error TK_RPAREN \n");
                        }
#line 3995 "cyacc.tab.c"
    break;
 
  case 126: /* bracket_comma_expression: TK_LBRACKET comma_expression TK_RBRACKET  */
#line 1565 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.liste) = (yyvsp[-1].liste);
                        }
#line 4003 "cyacc.tab.c"
    break;
 
  case 127: /* bracket_comma_expression: TK_LBRACKET error TK_RBRACKET  */
#line 1569 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          CParserError("Parse error: TK_LBRACKET error TK_RBRACKET\n");
                        }
#line 4011 "cyacc.tab.c"
    break;
 
  case 128: /* $@3: %empty  */
#line 1578 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { EnterScope();
                          /* To avoid some parasitic line skipping after the
                             block opening brace. May be it should be
                             cleaner to keep this eventual line-break as a
                             comment in the statement, for subtler user
                             source layout representation? */
                          discard_C_comment();
                        }
#line 4024 "cyacc.tab.c"
    break;
 
  case 129: /* statements_inside_block: TK_LBRACE $@3 local_labels block_attrs statement_list  */
#line 1587 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.statement) = MakeBlock((yyvsp[0].liste));
                          ExitScope();
                        }
#line 4033 "cyacc.tab.c"
    break;
 
  case 130: /* block: statements_inside_block TK_RBRACE  */
#line 1594 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.statement) = (yyvsp[-1].statement);
                        }
#line 4041 "cyacc.tab.c"
    break;
 
  case 131: /* block: error location TK_RBRACE  */
#line 1599 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
{ abort();CParserError("Parse error: error location TK_RBRACE \n"); }
#line 4047 "cyacc.tab.c"
    break;
 
  case 132: /* block_attrs: %empty  */
#line 1604 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
{}
#line 4053 "cyacc.tab.c"
    break;
 
  case 133: /* statement_list: %empty  */
#line 1611 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { (yyval.liste) = NIL; }
#line 4059 "cyacc.tab.c"
    break;
 
  case 134: /* statement_list: pragmas  */
#line 1612 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
          {
  statement s = make_continue_statement(entity_empty_label());
  add_pragma_strings_to_statement(s, gen_nreverse((yyvsp[0].liste)),false);
  gen_free_list((yyvsp[0].liste));
  (yyval.liste) = CONS(STATEMENT, s, NIL);
  }
#line 4070 "cyacc.tab.c"
    break;
 
  case 135: /* statement_list: statement statement_list  */
#line 1619 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.liste) = CONS(STATEMENT,(yyvsp[-1].statement),(yyvsp[0].liste));
                        }
#line 4078 "cyacc.tab.c"
    break;
 
  case 136: /* statement_list: label  */
#line 1623 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                { CParserError("gcc not implemented\n"); }
#line 4084 "cyacc.tab.c"
    break;
 
  case 137: /* local_labels: %empty  */
#line 1627 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {}
#line 4090 "cyacc.tab.c"
    break;
 
  case 138: /* local_labels: TK_LABEL__ local_label_names TK_SEMICOLON local_labels  */
#line 1629 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { CParserError("LABEL__ not implemented\n"); }
#line 4096 "cyacc.tab.c"
    break;
 
  case 139: /* local_label_names: TK_IDENT  */
#line 1633 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {free((yyvsp[0].string));}
#line 4102 "cyacc.tab.c"
    break;
 
  case 140: /* local_label_names: TK_IDENT TK_COMMA local_label_names  */
#line 1634 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                                       {free((yyvsp[-2].string));}
#line 4108 "cyacc.tab.c"
    break;
 
  case 141: /* label: TK_IDENT TK_COLON  */
#line 1639 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          // Push the comment associated with the label:
                          push_current_C_comment();
                          (yyval.string) = (yyvsp[-1].string);
                        }
#line 4118 "cyacc.tab.c"
    break;
 
  case 142: /* pragma: TK__Pragma TK_LPAREN string_constant TK_RPAREN  */
#line 1648 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                                                  {
     /* Well, indeed this has not been tested at the time of writing since
        the _Pragma("...") is replaced by a #pragma ... in the C
        preprocessor, at least in gcc 4.4. */
     /* The pragma string has been strdup()ed in the lexer... */
     pips_debug(1, "Found _Pragma(\"%s\")\n", (yyvsp[-1].string));
     (yyval.string) = (yyvsp[-1].string);
   }
#line 4131 "cyacc.tab.c"
    break;
 
  case 143: /* pragma: TK_PRAGMA  */
#line 1656 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
             {
  pips_debug(1, "Found #pragma %s\n", c_lval.string);
     (yyval.string) = c_lval.string;
   }
#line 4140 "cyacc.tab.c"
    break;
 
  case 144: /* pragmas: pragma  */
#line 1664 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
       { /* Only one pragma... The common case, return it in a list */
  pips_debug(1, "No longer pragma\n");
  (yyval.liste) = CONS(STRING, (yyvsp[0].string), NIL);
  }
#line 4149 "cyacc.tab.c"
    break;
 
  case 145: /* pragmas: pragma pragmas  */
#line 1668 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                 {
  /* Concatenate the pragma to the list of pragmas */
  (yyval.liste) = CONS(STRING,(yyvsp[-1].string),(yyvsp[0].liste));
}
#line 4158 "cyacc.tab.c"
    break;
 
  case 146: /* statement: pragmas statement_without_pragma  */
#line 1677 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
{
  add_pragma_strings_to_statement((yyvsp[0].statement), gen_nreverse((yyvsp[-1].liste)),
                                  false /* Do not reallocate the strings*/);
  /* Reduce the CO2 impact of this code, even there is huge memory leaks
     everywhere around in this file: */
  gen_free_list((yyvsp[-1].liste));
  (yyval.statement) = (yyvsp[0].statement);
  reset_token_has_been_seen_p();
}
#line 4172 "cyacc.tab.c"
    break;
 
  case 147: /* statement: statement_without_pragma  */
#line 1686 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                           {
  (yyval.statement) = (yyvsp[0].statement);
  reset_token_has_been_seen_p();
  }
#line 4181 "cyacc.tab.c"
    break;
 
  case 148: /* statement_without_pragma: TK_SEMICOLON  */
#line 1695 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* Null statement in C is represented as continue statement in Fortran*/
                          /* FI: the comments should be handled at
                             another level, so as not to repeat the
                             same code over and over again? */
                          string sc = get_current_C_comment();
                          int sn = get_current_C_line_number();
                          statement s = make_continue_statement(entity_empty_label());
                          statement_comments(s) = sc;
                          statement_number(s) = sn;
                          (yyval.statement) = s;
                        }
#line 4198 "cyacc.tab.c"
    break;
 
  case 149: /* statement_without_pragma: comma_expression TK_SEMICOLON  */
#line 1708 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          pips_debug(1, "Reduction %d: comma_expression TK_SEMICOLON -> statement_without_pragma\n", __LINE__);
                          statement s = statement_undefined;
                          if (gen_length((yyvsp[-1].liste))==1) {
                            /* This uses the current comment and
                               current line number. */
                            s = ExpressionToStatement(EXPRESSION(CAR((yyvsp[-1].liste))));
                            gen_free_list((yyvsp[-1].liste));
                          }
                          else {
                            /* FI: I do not know how
                               expression_comment is supposed to
                               work for real comma expressions */
                            s = call_to_statement(make_call(CreateIntrinsic(COMMA_OPERATOR_NAME),(yyvsp[-1].liste)));
                            statement_number(s) =
                              get_current_C_line_number();
                            statement_comments(s) = get_current_C_comment();
                          }
                          (yyval.statement) = flush_expression_comment(s);
                        }
#line 4223 "cyacc.tab.c"
    break;
 
  case 150: /* statement_without_pragma: block  */
#line 1728 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { }
#line 4229 "cyacc.tab.c"
    break;
 
  case 151: /* statement_without_pragma: declaration  */
#line 1729 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* In C99 we can have a declaration anywhere!
 
                             Declaration returns a statement list. Maybe
                             it could be changed to return only a
                             statement? Well sometimes NIL is returned
                             here so deeper work is required for
                             this... */
                          pips_debug(1, "Reduction %d: declaration -> statement_without_pragma\n", __LINE__);
                          list sl = (yyvsp[0].liste);
                          if (gen_length(sl) > 1) {
                            /* print_statements(sl); */
                            pips_internal_error("There should be no more than 1 declaration at a time here instead of %zd\n", gen_length(sl));
                          }
                          /* Extract the statement from the list and free
                             the list container: */
                          statement s = make_statement_from_statement_list_or_empty_block(sl);
                          // Necessary for comma02.c
                          // statement_comments(s) = get_current_C_comment();
                          // statement_number(s) = get_current_C_line_number();
                          (yyval.statement) = flush_expression_comment(s);
}
#line 4256 "cyacc.tab.c"
    break;
 
  case 152: /* statement_without_pragma: TK_IF statement_paren_comma_expression statement  */
#line 1752 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.statement) = test_to_statement(make_test(MakeCommaExpression((yyvsp[-1].liste)), (yyvsp[0].statement),
                                                           make_empty_block_statement()));
                          pips_assert("statement is a test", statement_test_p((yyval.statement)));
                          string sc = pop_current_C_comment();
                          int sn = pop_current_C_line_number();
                          (yyval.statement) = add_comment_and_line_number((yyval.statement), sc, sn);
                          (yyval.statement) = flush_statement_comment((yyval.statement));
                        }
#line 4270 "cyacc.tab.c"
    break;
 
  case 153: /* statement_without_pragma: TK_IF statement_paren_comma_expression statement TK_ELSE statement  */
#line 1762 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.statement) = test_to_statement(make_test(MakeCommaExpression((yyvsp[-3].liste)),(yyvsp[-2].statement),(yyvsp[0].statement)));
                          pips_assert("statement is a test", statement_test_p((yyval.statement)));
                          string sc = pop_current_C_comment();
                          int sn = pop_current_C_line_number();
                          (yyval.statement) = add_comment_and_line_number((yyval.statement), sc, sn);
                          (yyval.statement) = flush_statement_comment((yyval.statement));
                        }
#line 4283 "cyacc.tab.c"
    break;
 
  case 154: /* $@4: %empty  */
#line 1771 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          stack_push((char *) make_sequence(NIL),SwitchGotoStack);
                          stack_push((char *) make_basic_int(loop_counter++), LoopStack);
                          /* push_current_C_comment(); */
                        }
#line 4293 "cyacc.tab.c"
    break;
 
  case 155: /* $@5: %empty  */
#line 1777 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          stack_push((char *)MakeCommaExpression((yyvsp[0].liste)),SwitchControllerStack);
                        }
#line 4301 "cyacc.tab.c"
    break;
 
  case 156: /* statement_without_pragma: TK_SWITCH $@4 statement_paren_comma_expression $@5 statement  */
#line 1781 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
 
                          (yyval.statement) = MakeSwitchStatement((yyvsp[0].statement));
                          string sc = pop_current_C_comment();
                          int sn = pop_current_C_line_number();
                          (yyval.statement) = add_comment_and_line_number((yyval.statement), sc, sn);
                          //$$ = flush_statement_comment($$); SG too dangerous, maybe on a block
                          stack_pop(SwitchGotoStack);
                          stack_pop(SwitchControllerStack);
                          stack_pop(LoopStack);
                        }
#line 4317 "cyacc.tab.c"
    break;
 
  case 157: /* $@6: %empty  */
#line 1793 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          stack_push((char *) make_basic_int(loop_counter++), LoopStack);
                          /* push_current_C_comment(); */
                        }
#line 4326 "cyacc.tab.c"
    break;
 
  case 158: /* statement_without_pragma: TK_WHILE $@6 statement_paren_comma_expression statement  */
#line 1798 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          string sc = pop_current_C_comment();
                          int sn = pop_current_C_line_number();
                          pips_assert("While loop body consistent",statement_consistent_p((yyvsp[0].statement)));
                          (yyval.statement) = MakeWhileLoop((yyvsp[-1].liste),(yyvsp[0].statement),true);
                          (yyval.statement) = add_comment_and_line_number((yyval.statement), sc, sn);
                          (yyval.statement) = flush_statement_comment((yyval.statement));
                          stack_pop(LoopStack);
                        }
#line 4340 "cyacc.tab.c"
    break;
 
  case 159: /* $@7: %empty  */
#line 1808 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          stack_push((char *) make_basic_int(loop_counter++), LoopStack);
                          /* push_current_C_comment(); */
                        }
#line 4349 "cyacc.tab.c"
    break;
 
  case 160: /* statement_without_pragma: TK_DO $@7 statement TK_WHILE statement_paren_comma_expression TK_SEMICOLON  */
#line 1813 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.statement) = MakeWhileLoop((yyvsp[-1].liste),(yyvsp[-3].statement),false);
                          /* The line number and comment are related to paren_comma_expression and not to TK_DO */
                          (void) pop_current_C_line_number();
                          (void) pop_current_C_comment();
                          stack_pop(LoopStack);
                        }
#line 4361 "cyacc.tab.c"
    break;
 
  case 161: /* $@8: %empty  */
#line 1826 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* Save the comments agregated in the for close up to now: */
                          push_current_C_comment();
                        }
#line 4370 "cyacc.tab.c"
    break;
 
  case 162: /* statement_without_pragma: for_clause opt_expression TK_SEMICOLON opt_expression TK_SEMICOLON opt_expression $@8 TK_RPAREN statement  */
#line 1832 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.statement) = MakeForloop((yyvsp[-7].expression), (yyvsp[-5].expression), (yyvsp[-3].expression), (yyvsp[0].statement));
                          (yyval.statement)=flush_expression_comment((yyval.statement));
                        }
#line 4379 "cyacc.tab.c"
    break;
 
  case 163: /* $@9: %empty  */
#line 1837 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* We need a new variable scope to avoid
                             conflict names between the loop index and
                             some previous upper declarations: */
                          EnterScope();
                        }
#line 4390 "cyacc.tab.c"
    break;
 
  case 164: /* $@10: %empty  */
#line 1848 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* Save the comments agregated in the for close up to now: */
                          push_current_C_comment();
                        }
#line 4399 "cyacc.tab.c"
    break;
 
  case 165: /* statement_without_pragma: for_clause $@9 declaration opt_expression TK_SEMICOLON opt_expression TK_RPAREN $@10 statement  */
#line 1853 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.statement) = MakeForloopWithIndexDeclaration((yyvsp[-6].liste), (yyvsp[-5].expression), (yyvsp[-3].expression), (yyvsp[0].statement));
                          (yyval.statement)=flush_expression_comment((yyval.statement));
                          ExitScope();
                        }
#line 4409 "cyacc.tab.c"
    break;
 
  case 166: /* statement_without_pragma: label statement  */
#line 1859 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* Create the statement with label comment in
                             front of it: */
                          (yyval.statement) = MakeLabeledStatement((yyvsp[-1].string),(yyvsp[0].statement), pop_current_C_comment());
                          free((yyvsp[-1].string));
                          /* ifdebug(8) { */
                          /*   pips_debug(8,"Adding label '%s' to statement:\n", $1); */
                          /*   print_statement($$); */
                          /* } */
                        }
#line 4424 "cyacc.tab.c"
    break;
 
  case 167: /* statement_without_pragma: TK_CASE expression TK_COLON  */
#line 1870 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.statement) = MakeCaseStatement((yyvsp[-1].expression));
                        }
#line 4432 "cyacc.tab.c"
    break;
 
  case 168: /* statement_without_pragma: TK_CASE expression TK_ELLIPSIS expression TK_COLON  */
#line 1874 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          CParserError("case e1..e2 : not implemented\n");
                        }
#line 4440 "cyacc.tab.c"
    break;
 
  case 169: /* statement_without_pragma: TK_DEFAULT TK_COLON  */
#line 1878 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.statement) = MakeDefaultStatement();
                        }
#line 4448 "cyacc.tab.c"
    break;
 
  case 170: /* statement_without_pragma: TK_RETURN TK_SEMICOLON  */
#line 1882 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* $$ =  call_to_statement(make_call(CreateIntrinsic(C_RETURN_FUNCTION_NAME),NIL)); */
                          if(!get_bool_property("C_PARSER_RETURN_SUBSTITUTION"))
                          (yyval.statement) = make_statement(entity_empty_label(),
                                              get_current_C_line_number(),
                                              STATEMENT_ORDERING_UNDEFINED,
                                              get_current_C_comment(),
                                              call_to_instruction(make_call(CreateIntrinsic(C_RETURN_FUNCTION_NAME),NIL)),
                                              NIL, string_undefined,
                                              empty_extensions (), make_synchronization_none());
                          else
                            (yyval.statement) = C_MakeReturnStatement(NIL,
                                                       get_current_C_line_number(),
                                                       get_current_C_comment());
                          /*
                            $$ = make_statement(entity_empty_label(),
                                                get_current_C_line_number(),
                                                STATEMENT_ORDERING_UNDEFINED,
                                                get_current_C_comment(),
                                                C_MakeReturn(NIL),
                                                NIL,
                                                string_undefined,
                                                empty_extensions());
                          */
 
                          statement_consistent_p((yyval.statement));
                        }
#line 4480 "cyacc.tab.c"
    break;
 
  case 171: /* statement_without_pragma: TK_RETURN comma_expression TK_SEMICOLON  */
#line 1910 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* $$ =  call_to_statement(make_call(CreateIntrinsic(C_RETURN_FUNCTION_NAME),$2)); */
                          list el = (yyvsp[-1].liste);
                          expression res = expression_undefined;
                          if(gen_length(el)>1) {
                            res = make_call_expression(CreateIntrinsic(COMMA_OPERATOR_NAME), el);
                            el = CONS(EXPRESSION, res, NIL);
                          }
                          else if(gen_length(el)==1)
                            res = EXPRESSION(CAR((yyvsp[-1].liste)));
 
                          if(expression_reference_p(res)) {
                            reference r = expression_reference(res);
                            entity v = reference_variable(r);
                            type t = ultimate_type(entity_type(v));
                            if(type_functional_p(t)) {
                              /* pointers to functions, hence
                                 functions can be returned in C */
                              /* FI: relationship with undeclared? */
                              /*
                              c_parser_user_warning("Ill. returned value: reference to function \"%s\""
                                                " or variable \"%s\" not declared\n",
                                                entity_user_name(v), entity_user_name(v));
                              CParserError("Ill. return expression");
                              */
                            }
                          }
                          if(!get_bool_property("C_PARSER_RETURN_SUBSTITUTION"))
                          (yyval.statement) = make_statement(entity_empty_label(),
                                              get_current_C_line_number(),
                                              STATEMENT_ORDERING_UNDEFINED,
                                              get_current_C_comment(),
                                              make_instruction(is_instruction_call,
                                              make_call(CreateIntrinsic(C_RETURN_FUNCTION_NAME), el)),
                                              NIL, string_undefined, empty_extensions (), make_synchronization_none());
                          else
                            (yyval.statement) = C_MakeReturnStatement(el,
                                                       get_current_C_line_number(),
                                                       get_current_C_comment());
                          /*
                            $$ = make_statement(entity_empty_label(),
                                                get_current_C_line_number(),
                                                STATEMENT_ORDERING_UNDEFINED,
                                                get_current_C_comment(),
                                                C_MakeReturn($2),
                                                NIL,
                                                string_undefined,
                                                empty_extensions());
                          */
                          (yyval.statement)=flush_expression_comment((yyval.statement));
                          statement_consistent_p((yyval.statement));
                        }
#line 4537 "cyacc.tab.c"
    break;
 
  case 172: /* statement_without_pragma: TK_BREAK TK_SEMICOLON  */
#line 1963 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.statement) = MakeBreakStatement(get_current_C_comment());
                        }
#line 4545 "cyacc.tab.c"
    break;
 
  case 173: /* statement_without_pragma: TK_CONTINUE TK_SEMICOLON  */
#line 1967 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.statement) = MakeContinueStatement(get_current_C_comment());
                        }
#line 4553 "cyacc.tab.c"
    break;
 
  case 174: /* statement_without_pragma: TK_GOTO TK_IDENT TK_SEMICOLON  */
#line 1971 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.statement) = MakeGotoStatement((yyvsp[-1].string));
                          free((yyvsp[-1].string));
                        }
#line 4562 "cyacc.tab.c"
    break;
 
  case 175: /* statement_without_pragma: TK_GOTO TK_STAR comma_expression TK_SEMICOLON  */
#line 1976 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          CParserError("GOTO * exp not implemented\n");
                        }
#line 4570 "cyacc.tab.c"
    break;
 
  case 176: /* statement_without_pragma: TK_ASM asmattr TK_LPAREN string_constant asmoutputs TK_RPAREN TK_SEMICOLON  */
#line 1980 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { 
                                                        call c  = make_call(
                                                                        entity_intrinsic(ASM_FUNCTION_NAME),
                                                                        CONS(EXPRESSION,entity_to_expression(
                                                                                make_C_constant_entity((yyvsp[-3].string), is_basic_string, 0)
                                                                        ),NIL)
                                                                );
                                                        free((yyvsp[-3].string));
                                                        (yyval.statement) = make_statement(
                                                                entity_empty_label(),
                                                                get_current_C_line_number(),
                                                                STATEMENT_ORDERING_UNDEFINED,
                                                                get_current_C_comment(),
                                                                make_instruction_call(c),
                                                                NIL, string_undefined,
                                                                empty_extensions(), make_synchronization_none());
                                                }
#line 4592 "cyacc.tab.c"
    break;
 
  case 177: /* statement_without_pragma: TK_MSASM  */
#line 1998 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { CParserError("ASM not implemented\n"); }
#line 4598 "cyacc.tab.c"
    break;
 
  case 178: /* statement_without_pragma: error location TK_SEMICOLON  */
#line 2000 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          CParserError("Parse error: error location TK_SEMICOLON\n");
                        }
#line 4606 "cyacc.tab.c"
    break;
 
  case 179: /* $@11: %empty  */
#line 2008 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* Number the loops in prefix depth-first: */
                          stack_push((char *) make_basic_int(loop_counter++),
                                     LoopStack);
                          /* Record the line number of thw "for" keyword: */
                          push_current_C_line_number();
                          /* Try to save a max of comments. The issue is
                             that opt_expression's afterwards can reset
                             the comments if there is a comma_expression
                             in them. So at least preserve the commemts
                             before the for.
 
                             Issue trigered by several examples such as
                             validation/Semantics-New/do01.tpips
 
                             But I think now (RK, 2011/02/05 :-) ) that in
                             a source-to-source compiler comments should
                             appear *explicitly* in the parser syntax and
                             not be dealt by some side effects in the
                             lexer as now in PIPS with some stacks and so
                             on.
                          */
                          push_current_C_comment();
                        }
#line 4635 "cyacc.tab.c"
    break;
 
  case 181: /* declaration: decl_spec_list init_declarator_list TK_SEMICOLON  */
#line 2038 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          pips_debug(1, "Reduction %d: decl_spec_list init_declarator_list TK_SEMICOLON -> declaration\n", __LINE__);
 
                          list el1 = (yyvsp[-2].liste);
                          list el2 = (yyvsp[-1].liste);
                          list el12 = gen_nconc(el1,el2);
                          statement s = statement_undefined;
 
                          pips_assert("el1 is an entity list", entities_p(el1));
                          pips_assert("el2 is an entity list", entities_p(el2));
                          pips_assert("Variable in el1 has not been declared before", !gen_in_list_p(el1, el2));
 
                          if(!ENDP(el12)) {
                            list el0 = GetDerivedEntityDeclarations();
                            FOREACH(ENTITY, e, el0) {
                              if(!gen_in_list_p(e, el12))
                                el12 = CONS(ENTITY, e, el12);
                            }
                            gen_free_list(el0);
 
                            ifdebug(8) {
                              fprintf(stderr, "At %d, make_declarations_statement for ", __LINE__);
                              print_entities(el12);
                              fprintf(stderr, "\n");
                            }
 
                            int sn = get_current_C_line_number();
                            string sc = get_current_C_comment();
                            s = make_declarations_statement(el12, sn, sc);
                            initialization_expressions = add_prettyprint_control_list_to_declaration_statement(s, initialization_expressions);
 
                            ifdebug(1) {
                              fprintf(stderr, "New declaration statement for entities: ");
                              print_entities(el12);
                              fprintf(stderr, "\n");
                            }
                            pips_assert("no duplicate declaration",
                                        gen_once_p(el12));
                          }
                          else {
                            pips_internal_error("Unexpected case");
                          }
 
                          UpdateEntities(el2,ContextStack,FormalStack,FunctionStack,OffsetStack,is_external,true);
                          PopContext();
                          remove_entity_type_stacks(el12);
                          CleanUpEntities(el12);
                          (yyval.liste) = CONS(STATEMENT,s,NIL);
                          reset_token_has_been_seen_p();
                        }
#line 4690 "cyacc.tab.c"
    break;
 
  case 182: /* declaration: decl_spec_list TK_SEMICOLON  */
#line 2089 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          pips_debug(1, "Reduction %d: decl_spec_list TK_SEMICOLON -> declaration\n", __LINE__);
                          list dl = (yyvsp[-1].liste);
                          FOREACH(ENTITY, e, dl) {
                            value v = entity_initial(e);
                            if(value_undefined_p(v))
                              entity_initial(e) = make_value_unknown();
                          }
                          // FI: we build a declaration statement
                          // for each field of an enum...
                          int sn = get_current_C_line_number();
                          string sc = get_current_C_comment();
                          pips_debug(8, "New declaration statement at line %d\n", __LINE__);
                          statement s = make_declarations_statement(dl, sn, sc);
                          initialization_expressions = add_prettyprint_control_list_to_declaration_statement(s, initialization_expressions);
                          reset_token_has_been_seen_p();
                          //UpdateEntities(dl,ContextStack,FormalStack,FunctionStack,OffsetStack,is_external,true);
                          PopContext();
                          ResetDerivedEntityDeclarations();
                          (yyval.liste) = CONS(STATEMENT,s, NIL);
                          BREAKPOINT;
                        }
#line 4717 "cyacc.tab.c"
    break;
 
  case 183: /* init_declarator_list: init_declarator  */
#line 2115 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
 
                          (yyval.liste) = CONS(ENTITY,(yyvsp[0].entity),NIL);
                        }
#line 4726 "cyacc.tab.c"
    break;
 
  case 184: /* init_declarator_list: init_declarator TK_COMMA init_declarator_list  */
#line 2120 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.liste) = CONS(ENTITY,(yyvsp[-2].entity),(yyvsp[0].liste));
                        }
#line 4734 "cyacc.tab.c"
    break;
 
  case 185: /* init_declarator: declarator  */
#line 2126 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* The default initial value is often zero,
                              but not so for formal parameters or
                              functions */
                          if(value_undefined_p(entity_initial((yyvsp[0].entity))))
                            entity_initial((yyvsp[0].entity)) = make_value_unknown();
                          add_initialization_expression(0);
                          pips_debug(1, "declarator to init_declarator for entity %s\n", entity_name((yyvsp[0].entity)));
                        }
#line 4748 "cyacc.tab.c"
    break;
 
  case 186: /* init_declarator: declarator TK_EQ init_expression  */
#line 2136 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          entity v = (yyvsp[-2].entity);
                          expression nie = (yyvsp[0].expression);
 
                          if(expression_undefined_p(nie)) {
                            /* Do nothing, leave the initial field of entity as it is. */
                            c_parser_user_warning("Undefined init_expression, why not use value_unknown?\n");
                            add_initialization_expression(0);
                          pips_debug(1, "declarator TK_EQ init_expression to init_declarator, with expression undefined\n");
                          }
                          else {
                            (void) simplify_C_expression(nie);
                            /* Put init_expression in the initial value of entity declarator*/
                            set_entity_initial(v, nie);
                            add_initialization_expression(1);
                            pips_debug(1, "declarator TK_EQ init_expression to init_declarator\n");
                          }
                        }
#line 4771 "cyacc.tab.c"
    break;
 
  case 187: /* $@12: %empty  */
#line 2157 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                       {
                         if(stack_empty_p(ContextStack)) {
                           ycontext = CreateDefaultContext();
                           pips_debug(8, "new default context %p with scope \"%s\"\n", ycontext,
                                      c_parser_context_scope(ycontext));
                         }
                         else {
                           /* Copy may be excessive as only the scope needs to be preserved...*/
                           //ycontext = copy_c_parser_context((c_parser_context)stack_head(ContextStack));
                           ycontext = GetContextCopy();
                           /* FI: You do not want to propagate
                              qualifiers */
                           gen_full_free_list(c_parser_context_qualifiers(ycontext));
                           c_parser_context_qualifiers(ycontext) = NIL;
                           /* How can these two problems occur since
                              ycontext is only a copy of the
                              ContextStack's head? Are we in the
                              middle of a stack_push() /stack_pop()?
                              The previous policy was to always
                              allocate a new ycontext, regardless of
                              the stack state */
                           /* FI: a bit afraid of freeing the past type if any */
                           c_parser_context_type(ycontext) = type_undefined;
                           /* A new context is entered: no longer typedef as in
                            "typedef int f(int a)" when we hit "int a"*/
                           c_parser_context_typedef(ycontext) = false;
                           /* FI: sometimes, the scope is erased and lost */
                           //if(strcmp(c_parser_context_scope(ycontext), "TOP-LEVEL:")==0)
                           //  c_parser_context_scope(ycontext) = empty_scope();
                           /* Finally, to avoid problems!*/
                           //c_parse
                           //r_context_scope(ycontext) = empty_scope();
 
                           /* Only block scope information is inherited */
                           if(!string_block_scope_p(c_parser_context_scope(ycontext))
                              && !string_struct_scope_p(c_parser_context_scope(ycontext))) {
                             /* FI: too primitive; we need to push
                                and pop contexts more than to update
                                them.
 
                                Problem with "extern f(x), g(y);". f
                                anf g are definitvely top-level, but x
                                and y must be searched in the current
                                scope first.
                             */
                             pips_debug(8, "Reset modified scope \"%s\"\n",
                                        c_parser_context_scope(ycontext));
                                 free(c_parser_context_scope(ycontext));
                             c_parser_context_scope(ycontext) = empty_scope();
                           }
                           pips_debug(8, "new context %p with scope \"%s\" copied from context %p (stack size=%d)\n",
                                      ycontext,
                                      c_parser_context_scope(ycontext),
                                      stack_head(ContextStack),
                                      stack_size(ContextStack));
                         }
                        }
#line 4833 "cyacc.tab.c"
    break;
 
  case 188: /* decl_spec_list: $@12 my_decl_spec_list  */
#line 2214 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                  {pips_debug(1, "Reduction %d: my_decl_spec_list -> decl_spec_list\n", __LINE__); (yyval.liste) = (yyvsp[0].liste);}
#line 4839 "cyacc.tab.c"
    break;
 
  case 189: /* my_decl_spec_list: TK_TYPEDEF decl_spec_list_opt  */
#line 2220 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* Add TYPEDEF_PREFIX to entity name prefix and make it a rom storage */
                          c_parser_context_typedef(ycontext) = true;
                          c_parser_context_storage(ycontext) = make_storage_rom();
                          //pips_assert("CONTINUE for declarations", continue_statements_p($2));
                          pips_assert("Entity list for declarations", entities_p((yyvsp[0].liste)));
                          (yyval.liste) = (yyvsp[0].liste);
                        }
#line 4852 "cyacc.tab.c"
    break;
 
  case 190: /* my_decl_spec_list: TK_EXTERN decl_spec_list_opt  */
#line 2229 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* This can be a variable or a function, whose storage is ram or return  */
                          /* What is the scope in cyacc.y of this
                             scope modification? Too much because the
                             TOP_LEVEL scope is going to be used for
                             argument types as well... */
                          pips_debug(8, "Scope of context %p forced to TOP_LEVEL_MODULE_NAME\n", ycontext);
                          free(c_parser_context_scope(ycontext));
                          c_parser_context_scope(ycontext) = strdup(concatenate(TOP_LEVEL_MODULE_NAME,
                                                                               MODULE_SEP_STRING,NULL));
                          pips_assert("Entity list for declarations", entities_p((yyvsp[0].liste)));
                          /* FI: because of C laxity about
                             redeclarations in compilation unit, the
                             EXTERN information should be carried by
                             the declaration statement to be able to
                             regenerate precise source-to-source. */
                          // fprintf(stderr, "Force extern declaration.\n");
                          // statement dls = STATEMENT(CAR($2));
                          set_prettyprint_control_list_to_extern();
                          (yyval.liste) = (yyvsp[0].liste);
                        }
#line 4878 "cyacc.tab.c"
    break;
 
  case 191: /* my_decl_spec_list: TK_STATIC decl_spec_list_opt  */
#line 2251 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          pips_debug(1, "Reduction %d: TK_STATIC decl_spec_list_opt -> my_decl_spec_list\n", __LINE__);
                          c_parser_context_static(ycontext) = true;
                          pips_assert("Entity list for declarations", entities_p((yyvsp[0].liste)));
                          (yyval.liste) = (yyvsp[0].liste);
                        }
#line 4889 "cyacc.tab.c"
    break;
 
  case 192: /* my_decl_spec_list: TK_THREAD decl_spec_list_opt  */
#line 2258 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* Add to type variable qualifiers */
                          c_parser_context_qualifiers(ycontext) = gen_nconc(c_parser_context_qualifiers(ycontext),
                                                                           CONS(QUALIFIER,make_qualifier_thread(),NIL));
                          pips_assert("Entity list for declarations", entities_p((yyvsp[0].liste)));
                          (yyval.liste) = (yyvsp[0].liste);
                        }
#line 4901 "cyacc.tab.c"
    break;
 
  case 193: /* my_decl_spec_list: TK_AUTO decl_spec_list_opt  */
#line 2266 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* Make dynamic storage for current entity */
                          c_parser_context_qualifiers(ycontext) = gen_nconc(c_parser_context_qualifiers(ycontext),
                                                                           CONS(QUALIFIER,make_qualifier_auto(),NIL));
                          pips_assert("Entity list for declarations", entities_p((yyvsp[0].liste)));
                          (yyval.liste) = (yyvsp[0].liste);
                        }
#line 4913 "cyacc.tab.c"
    break;
 
  case 194: /* my_decl_spec_list: TK_REGISTER decl_spec_list_opt  */
#line 2274 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* Add to type variable qualifiers */
                          c_parser_context_qualifiers(ycontext) = gen_nconc(c_parser_context_qualifiers(ycontext),
                                                                           CONS(QUALIFIER,make_qualifier_register(),NIL));
                          pips_assert("Entity list for declarations", entities_p((yyvsp[0].liste)));
                          (yyval.liste) = (yyvsp[0].liste);
                        }
#line 4925 "cyacc.tab.c"
    break;
 
  case 195: /* my_decl_spec_list: type_spec decl_spec_list_opt_no_named  */
#line 2283 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          pips_debug(1, "Reduction %d: type_spec decl_spec_list_opt_no_named -> my_decl_spec_list\n", __LINE__);
                          BREAKPOINT;
                          // el contains only hidden internal PIPS
                          // entities, but some of them at least must
                          // be seen by the prettyprinter
                          list el = (yyvsp[-1].liste); // entity list
                          list sl = (yyvsp[0].liste); // entity list
                          list rl = list_undefined;
                          pips_assert("el contains an entity list", entities_p(el));
                          pips_assert("sl contains an entity list", entities_p(sl));
                          if(ENDP(el)) {
                            rl = sl;
                          }
                          else if(ENDP(sl)) {
                            //BREAKPOINT;
                            rl = el;
                            ifdebug(8) {
                              //pips_debug(8, "New declaration statement for entities:\n");
                              print_entities(el);
                              fprintf(stderr, "\n");
                            }
                          }
                          else if(gen_length(sl)==1) {
                            // FI: I'm not sure it ever happens
                            // statement s = STATEMENT(CAR(sl));
                            ifdebug(8) {
                              //pips_debug(8, "Previous (unexpected) continue statement for entities: ");
                              //print_entities(statement_declarations(s));
                              print_entities(el);
                              fprintf(stderr, "\n");
                              pips_debug(8, "New entities added: ");
                              print_entities(el);
                              fprintf(stderr, "\n");
                              // rl = sl;
                            }
                            //statement_declarations(s) =
                            //gen_nconc(el, statement_declarations(s));
                            rl = gen_nconc(el, sl);
                          }
                          else {
                            pips_internal_error("Multiple statements not expected\n");
                            /* statement s = */
                            /*   make_continue_statement(entity_empty_label()); */
                            /* statement_declarations(s) = el; */
                            // $$ = gen_nconc($1,$2);
                            //$$ = $2;
                            //rl = gen_nconc(CONS(STATEMENT, s, NIL),sl);
                          }
                          (yyval.liste) = rl;
                        }
#line 4981 "cyacc.tab.c"
    break;
 
  case 196: /* my_decl_spec_list: TK_INLINE decl_spec_list_opt  */
#line 2336 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          c_parser_user_warning("Keyword \"inline\" ignored\n");
                          pips_assert("Entity list for declarations", entities_p((yyvsp[0].liste)));
                          (yyval.liste) = (yyvsp[0].liste);
                        }
#line 4991 "cyacc.tab.c"
    break;
 
  case 197: /* my_decl_spec_list: attribute decl_spec_list_opt  */
#line 2342 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          list ql = c_parser_context_qualifiers(ycontext);
                          qualifier nq = (yyvsp[-1].qualifier);
 
                          c_parser_context_qualifiers(ycontext)
                            = insert_qualifier(ql, nq);
 
                          pips_assert("Entity list for declarations", entities_p((yyvsp[0].liste)));
                          (yyval.liste) = (yyvsp[0].liste);
                        }
#line 5006 "cyacc.tab.c"
    break;
 
  case 198: /* my_decl_spec_list: TK_AT_SPECIFIER TK_LPAREN TK_IDENT TK_RPAREN  */
#line 2354 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          CParserError("CIL AT not implemented\n");
                        }
#line 5014 "cyacc.tab.c"
    break;
 
  case 199: /* decl_spec_list_opt: %empty  */
#line 2363 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          //stack_push((char *) ycontext, ContextStack);
                          PushContext(ycontext);
                          (yyval.liste) = NIL;
                        }
#line 5024 "cyacc.tab.c"
    break;
 
  case 200: /* decl_spec_list_opt: my_decl_spec_list  */
#line 2368 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                           { }
#line 5030 "cyacc.tab.c"
    break;
 
  case 201: /* decl_spec_list_opt_no_named: %empty  */
#line 2377 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          pips_debug(1, "Reduction %d: empty -> decl_spec_list_opt_no_named\n", __LINE__);
                          // decl48.c: ycontext is not good because
                          // the current scope information is lost.
                          // I do not want to remove the Push to keep
                          // the Push/Pop balance ok
                          //PushContext(ycontext);
                          if(stack_empty_p(ContextStack))
                            PushContext(ycontext);
                          else {
                            c_parser_context y = GetContext();
                            string stf = (c_parser_context_scope(ycontext));
                            c_parser_context_scope(ycontext) =
                              strdup(c_parser_context_scope(y));
                                free(stf);
                            PushContext(ycontext);
                          }
                          (yyval.liste) = NIL;
                        }
#line 5054 "cyacc.tab.c"
    break;
 
  case 202: /* decl_spec_list_opt_no_named: my_decl_spec_list  */
#line 2396 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                           {pips_debug(1, "Reduction %d: my_decl_spec_list -> decl_spec_list_opt_no_named\n", __LINE__);
 }
#line 5061 "cyacc.tab.c"
    break;
 
  case 203: /* type_spec: TK_VOID  */
#line 2403 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          c_parser_context_type(ycontext) = make_type_void(NIL);
                          (yyval.liste) = NIL;
                        }
#line 5070 "cyacc.tab.c"
    break;
 
  case 204: /* type_spec: TK_CHAR  */
#line 2408 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          c_parser_context_type(ycontext) = make_standard_integer_type(c_parser_context_type(ycontext),
                                                                                      DEFAULT_CHARACTER_TYPE_SIZE);
                          (yyval.liste) = NIL;
                        }
#line 5080 "cyacc.tab.c"
    break;
 
  case 205: /* type_spec: TK_SHORT  */
#line 2414 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          c_parser_context_type(ycontext) = make_standard_integer_type(c_parser_context_type(ycontext),
                                                                                      DEFAULT_SHORT_INTEGER_TYPE_SIZE);
                          (yyval.liste) = NIL;
                        }
#line 5090 "cyacc.tab.c"
    break;
 
  case 206: /* type_spec: TK_INT  */
#line 2420 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          pips_debug(1, "Reduction %d: TK_INT -> type_spec\n", __LINE__);
                          if (c_parser_context_type(ycontext) == type_undefined)
                            {
                              variable v = make_variable(make_basic_int(DEFAULT_INTEGER_TYPE_SIZE),NIL,NIL);
                              c_parser_context_type(ycontext) = make_type_variable(v);
                            }
                          (yyval.liste) = NIL;
                        }
#line 5104 "cyacc.tab.c"
    break;
 
  case 207: /* type_spec: TK_INT128  */
#line 2430 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          pips_debug(1, "Reduction %d: TK_INT128 -> type_spec\n", __LINE__);
                          if (c_parser_context_type(ycontext) == type_undefined)
                            {
                              variable v = make_variable(make_basic_int(DEFAULT_LONG_LONG_LONG_INTEGER_TYPE_SIZE),NIL,NIL);
                              c_parser_context_type(ycontext) = make_type_variable(v);
                            }
                          (yyval.liste) = NIL;
                        }
#line 5118 "cyacc.tab.c"
    break;
 
  case 208: /* type_spec: TK_UINT128  */
#line 2440 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          pips_debug(1, "Reduction %d: TK_UINT128 -> type_spec\n", __LINE__);
                          if (c_parser_context_type(ycontext) == type_undefined)
                            {
                              variable v = make_variable(make_basic_int(DEFAULT_LONG_LONG_LONG_INTEGER_TYPE_SIZE+10),NIL,NIL);
                              c_parser_context_type(ycontext) = make_type_variable(v);
                            }
                          (yyval.liste) = NIL;
                        }
#line 5132 "cyacc.tab.c"
    break;
 
  case 209: /* type_spec: TK_COMPLEX  */
#line 2450 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          if (c_parser_context_type(ycontext) == type_undefined)
                            {
                              variable v = make_variable(make_basic_complex(DEFAULT_COMPLEX_TYPE_SIZE),NIL,NIL);
                              c_parser_context_type(ycontext) = make_type_variable(v);
                            }
                          else {
                            /* Can be qualified by float, double and long double */
                            type t = c_parser_context_type(ycontext);
                            variable v = type_variable(t);
                            basic b = variable_basic(v);
 
                            pips_assert("prefix is for type variable",type_variable_p(t));
                            if(basic_float_p(b)) {
                              basic_tag(b) = is_basic_complex;
                              basic_complex(b) = 2*basic_complex(b);
                              if(basic_complex(b)==DEFAULT_COMPLEX_TYPE_SIZE)
                                basic_complex(b) += 1;
                            }
                          }
                          (yyval.liste) = NIL;
                        }
#line 5159 "cyacc.tab.c"
    break;
 
  case 210: /* type_spec: TK_LONG  */
#line 2473 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          c_parser_context_type(ycontext) = make_standard_long_integer_type(c_parser_context_type(ycontext));
                          (yyval.liste) = NIL;
                        }
#line 5168 "cyacc.tab.c"
    break;
 
  case 211: /* type_spec: TK_FLOAT  */
#line 2478 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          variable v = make_variable(make_basic_float(DEFAULT_REAL_TYPE_SIZE),NIL,NIL);
                          c_parser_context_type(ycontext) = make_type_variable(v);
                          (yyval.liste) = NIL;
                        }
#line 5178 "cyacc.tab.c"
    break;
 
  case 212: /* type_spec: TK_DOUBLE  */
#line 2484 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          variable v = variable_undefined;
                          type t = c_parser_context_type(ycontext);
 
                          if(type_undefined_p(t))
                            v = make_variable(make_basic_float(DEFAULT_DOUBLEPRECISION_TYPE_SIZE),NIL,NIL);
                          else {
                            if(default_complex_type_p(t)) {
                              c_parser_user_warning("'complex double' declaration is not in the C99 standard but we accept it. You should use 'double complex' instead.\n"
);
                              v = make_variable(make_basic_complex(DEFAULT_DOUBLECOMPLEX_TYPE_SIZE), NIL, NIL);
                            }
                            /* This secondary test is probably
                               useless. See the case of TK_COMPLEX. */
                            else if(standard_long_integer_type_p(t))
                              v = make_variable(make_basic_float(DEFAULT_QUADPRECISION_TYPE_SIZE),NIL,NIL);
                            else
                              /* FI: we should probably have a user
                                 or internal error here since we
                                 ignore the beginning of the type declaration*/
                              v = make_variable(make_basic_float(DEFAULT_DOUBLEPRECISION_TYPE_SIZE),NIL,NIL);
                            free_type(t);
                          }
                          c_parser_context_type(ycontext) = make_type_variable(v);
                          (yyval.liste) = NIL;
                        }
#line 5209 "cyacc.tab.c"
    break;
 
  case 213: /* type_spec: TK_SIGNED  */
#line 2511 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* see the IR document or ri-util.h for explanation */
                          int size = DEFAULT_INTEGER_TYPE_SIZE;
                          type t_old = c_parser_context_type(ycontext);
                          if(!type_undefined_p(t_old)) {
                            // FI: memory leak for t_old
                            variable v_old = type_variable(t_old);
                            basic b_old = variable_basic(v_old);
                            if(basic_int_p(b_old))
                              size = basic_int(b_old);
                            else
                              pips_internal_error("???");
                          }
                          variable v = make_variable(make_basic_int(DEFAULT_SIGNED_TYPE_SIZE*10+
                                                                    size),NIL,NIL);
                          c_parser_context_type(ycontext) = make_type_variable(v);
                          (yyval.liste) = NIL;
                        }
#line 5232 "cyacc.tab.c"
    break;
 
  case 214: /* type_spec: TK_UNSIGNED  */
#line 2530 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          int size = DEFAULT_INTEGER_TYPE_SIZE;
                          type t_old = c_parser_context_type(ycontext);
                          if(!type_undefined_p(t_old)) {
                            // FI: memory leak for t_old
                            variable v_old = type_variable(t_old);
                            basic b_old = variable_basic(v_old);
                            if(basic_int_p(b_old))
                              size = basic_int(b_old);
                            else
                              pips_internal_error("???");
                          }
                          variable v = make_variable(make_basic_int(DEFAULT_UNSIGNED_TYPE_SIZE*10+
                                                                    size),NIL,NIL);
                          c_parser_context_type(ycontext) = make_type_variable(v);
                          (yyval.liste) = NIL;
                        }
#line 5254 "cyacc.tab.c"
    break;
 
  case 215: /* type_spec: TK_STRUCT id_or_typename  */
#line 2548 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          pips_debug(1, "Reduction %d: TK_STRUCT id_or_typename -> type_spec\n", __LINE__);
                          // FI: this next call is now useless
                          set_prettyprint_control_list_to_dummy();
                          /* Find the entity associated to the struct, current scope can be [file%][module:][block]*/
                          entity ent = FindOrCreateEntityFromLocalNameAndPrefix((yyvsp[0].string),STRUCT_PREFIX,is_external);
                          /* Specify the type of the variable that follows this declaration specifier */
                          variable v = make_variable(make_basic_derived(ent),NIL,NIL);
                          /* To handle mesa.c (SPEC 2000 benchmark)
                             We have struct HashTable in a file, but do not know its structure and scope,
                             because it is declared in other file  */
                          if (type_undefined_p(entity_type(ent)))
                            entity_type(ent) = make_type_struct(NIL);
                          if (storage_undefined_p(entity_storage(ent)))
                            entity_storage(ent) = make_storage_rom();
                          c_parser_context_type(ycontext) = make_type_variable(v);
                          /* Declaration statement "struct s;"
                             disappears with $$ = NIL... See for
                             instance decl68.c. A place holder
                             variable is added, just in case. */
                          /* This may be useless, but will be fixed by
                             make_declarations_statement() */
                          entity phv = make_place_holder_variable(ent);
                          list dl = list_undefined;
                          if(entity_undefined_p(phv)) {
                            dl = CONS(ENTITY,ent,NIL);
                          }
                          else {
                            add_initialization_expression(0);
                            dl = CONS(ENTITY,ent,CONS(ENTITY, phv, NIL));
                          }
                          (yyval.liste) = dl;
                        }
#line 5292 "cyacc.tab.c"
    break;
 
  case 216: /* $@13: %empty  */
#line 2582 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          code c = make_code(NIL,(yyvsp[-1].string),sequence_undefined,NIL, make_language_c());
                          stack_push((char *) c, StructNameStack);
                        }
#line 5301 "cyacc.tab.c"
    break;
 
  case 217: /* type_spec: TK_STRUCT id_or_typename TK_LBRACE $@13 struct_decl_list TK_RBRACE  */
#line 2587 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          pips_debug(1, "Reduction %d: TK_STRUCT id_or_typename TK_LBRACE struct_decl_list TK_RBRACE -> type_spec\n", __LINE__);
                          /* field list, which may also contain nested
                             derived entities */
                          list fl = (yyvsp[-1].liste);
                          /* Create the struct entity */
                          entity ent = MakeDerivedEntity((yyvsp[-4].string),fl,is_external,is_type_struct);
                          /* Record the declaration of the struct
                             entity */
                          RecordDerivedEntityDeclaration(ent);
                          /* Specify the type of the variable that follows this declaration specifier*/
                          variable v = make_variable(make_basic_derived(ent),NIL,NIL);
                          /* Take from $5 the struct/union entities */
                          list le = TakeDerivedEntities(fl);
                          list rl = gen_in_list_p(ent, le)?
                            le : gen_nconc(le,CONS(ENTITY,ent,NIL));
                          /* Fields do not need to appear in the
                             declaration list, but they are used later
                             to decide which derived entities are
                             defined and which ones are used. */
                          FOREACH(ENTITY, f, fl) {
                            if(entity_field_p(f) && !gen_in_list_p(f,rl))
                              rl = gen_nconc(rl, CONS(ENTITY, f, NIL));
                          }
                          c_parser_context_type(ycontext) = make_type_variable(v);
                          stack_pop(StructNameStack);
                          BREAKPOINT;
                          //add_initialization_expression(1);
                          (yyval.liste) = rl;
                        }
#line 5336 "cyacc.tab.c"
    break;
 
  case 218: /* $@14: %empty  */
#line 2618 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
              string istr = int2a(derived_counter++);
                          code c = make_code(NIL,strdup(concatenate(DUMMY_STRUCT_PREFIX,
                                                                    istr,NULL)),sequence_undefined, NIL, make_language_c());
              free(istr);
                          stack_push((char *) c, StructNameStack);
                        }
#line 5348 "cyacc.tab.c"
    break;
 
  case 219: /* type_spec: TK_STRUCT TK_LBRACE $@14 struct_decl_list TK_RBRACE  */
#line 2626 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          pips_debug(1, "Reduction %d: TK_STRUCT TK_LBRACE struct_decl_list TK_RBRACE -> type_spec\n", __LINE__);
                          /* Create the struct entity with unique name s */
                          string s = code_decls_text((code) stack_head(StructNameStack));
                          list el = (yyvsp[-1].liste);
                          pips_assert("el is an entity list", entities_p(el));
                          entity ent = MakeDerivedEntity(s,el,is_external,is_type_struct);
                          variable v = make_variable(make_basic_derived(ent),NIL,NIL);
                          pips_assert("el is an entity list", entities_p(el));
                          /* Take from el the struct/union entities */
                          list le = TakeDerivedEntities(el);
                          list rl = gen_nconc(le,CONS(ENTITY,ent,NIL));
                          c_parser_context_type(ycontext) = make_type_variable(v);
                          stack_pop(StructNameStack);
                          BREAKPOINT;
                          //add_initialization_expression(1);
                          (yyval.liste) = rl;
                        }
#line 5371 "cyacc.tab.c"
    break;
 
  case 220: /* type_spec: TK_UNION id_or_typename  */
#line 2645 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          set_prettyprint_control_list_to_dummy();
                          /* Find the entity associated to the union, current scope can be [file%][module:][block]*/
                          entity ent = FindOrCreateEntityFromLocalNameAndPrefix((yyvsp[0].string),UNION_PREFIX,is_external);
                          /* Specify the type of the variable that follows this declaration specifier */
                          variable v = make_variable(make_basic_derived(ent),NIL,NIL);
                          if (type_undefined_p(entity_type(ent)))
                            entity_type(ent) = make_type_union(NIL);
                          if (storage_undefined_p(entity_storage(ent)))
                            entity_storage(ent) = make_storage_rom();
                          c_parser_context_type(ycontext) = make_type_variable(v);
                          /* This may be useless, but will be fixed by
                             make_declarations_statement() */
                          entity phv = make_place_holder_variable(ent);
                          list dl = list_undefined;
                          if(entity_undefined_p(phv)) {
                            dl = CONS(ENTITY,ent,NIL);
                          }
                          else {
                            add_initialization_expression(0);
                            dl = CONS(ENTITY,ent,CONS(ENTITY, phv, NIL));
                          }
                          //list dl = CONS(ENTITY, ent, NIL);
                          (yyval.liste) = dl;
                        }
#line 5401 "cyacc.tab.c"
    break;
 
  case 221: /* $@15: %empty  */
#line 2671 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          code c = make_code(NIL,(yyvsp[-1].string),sequence_undefined, NIL, make_language_c());
                          stack_push((char *) c, StructNameStack);
                        }
#line 5410 "cyacc.tab.c"
    break;
 
  case 222: /* type_spec: TK_UNION id_or_typename TK_LBRACE $@15 struct_decl_list TK_RBRACE  */
#line 2676 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          list fl = (yyvsp[-1].liste);
                          entity ent = MakeDerivedEntity((yyvsp[-4].string),fl,is_external,is_type_union);
                          variable v = make_variable(make_basic_derived(ent),NIL,NIL);
                          /* Take from $5 the indirectly declared
                             struct/union entities as in "struct {struct ... ". */
                          // FI: struct are treated much more carefully to avoid
                          // multiple occurences of one entity
                          list le = TakeDerivedEntities((yyvsp[-1].liste));
                          list rl = gen_nconc(le,CONS(ENTITY,ent,NIL));
                          //rl = gen_nconc(rl, fl);
                          //rl = gen_nconc(rl, le);
                          c_parser_context_type(ycontext) = make_type_variable(v);
                          stack_pop(StructNameStack);
                          (yyval.liste) = rl;
                        }
#line 5431 "cyacc.tab.c"
    break;
 
  case 223: /* $@16: %empty  */
#line 2693 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          string n = int2a(derived_counter++);
                          code c = make_code(NIL,
                                             strdup(concatenate(DUMMY_UNION_PREFIX,n,NULL)),
                                             sequence_undefined,
                                             NIL,
                                             make_language_c());
                          free(n);
                          stack_push((char *) c, StructNameStack);
                        }
#line 5446 "cyacc.tab.c"
    break;
 
  case 224: /* type_spec: TK_UNION TK_LBRACE $@16 struct_decl_list TK_RBRACE  */
#line 2704 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* Create the union entity with unique name */
                          string s = code_decls_text((code) stack_head(StructNameStack));
                          entity ent = MakeDerivedEntity(s,(yyvsp[-1].liste),is_external,is_type_union);
                          RecordDerivedEntityDeclaration(ent);
                          variable v = make_variable(make_basic_derived(ent),NIL,NIL);
                          /* Take from $4 the struct/union entities */
                          (void)TakeDerivedEntities((yyvsp[-1].liste));
                          //$$ = gen_nconc(le,CONS(ENTITY,ent,NIL));
                          //$$ = CONS(ENTITY,ent,le);
                          // entity phv = make_place_holder_variable(ent));
                          // list rl = CONS(ENTITY,ent,CONS(ENTITY, phv, NIL));
                          list rl = CONS(ENTITY,ent,NIL);
                          c_parser_context_type(ycontext) = make_type_variable(v);
                          stack_pop(StructNameStack);
                          (yyval.liste) = rl;
                        }
#line 5468 "cyacc.tab.c"
    break;
 
  case 225: /* type_spec: TK_ENUM id_or_typename  */
#line 2722 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          pips_debug(1, "Reduction %d: TK_ENUM id_or_typename -> type_spec\n", __LINE__);
                          set_prettyprint_control_list_to_dummy();
                          /* Find the entity associated to the enum */
                          entity ent = FindOrCreateEntityFromLocalNameAndPrefix((yyvsp[0].string),ENUM_PREFIX,is_external);
                          /* Specify the type of the variable that follows this declaration specifier */
                          variable v = make_variable(make_basic_derived(ent),NIL,NIL);
                          if (type_undefined_p(entity_type(ent)))
                            entity_type(ent) = make_type_enum(NIL);
                          /* FI: What should the initial value be? */
                          if (value_undefined_p(entity_initial(ent)))
                            entity_initial(ent) = make_value_unknown();
                          if (storage_undefined_p(entity_storage(ent)))
                            entity_storage(ent) = make_storage_rom();
                          if(!entity_undefined_p(get_current_module_entity()))
                            AddEntityToDeclarations(ent, get_current_module_entity());
                          else {
                            /* This happens with the old style
                               function declaration at least */
                            /* Oops, we have to assume that the enum
                               is also defined in the compilation
                               unit... else it would be useless. */
                            ;
                          }
                          c_parser_context_type(ycontext) = make_type_variable(v);
                          /* This may be useless, but will be fixed by
                             make_declarations_statement() */
                          entity phv = make_place_holder_variable(ent);
                          list dl = list_undefined;
                          if(entity_undefined_p(phv)) {
                            dl = CONS(ENTITY,ent,NIL);
                          }
                          else {
                            add_initialization_expression(0);
                            dl = CONS(ENTITY,ent,CONS(ENTITY, phv, NIL));
                          }
                          //list dl = CONS(ENTITY, ent, NIL);
                          (yyval.liste) = dl;
                        }
#line 5512 "cyacc.tab.c"
    break;
 
  case 226: /* type_spec: TK_ENUM id_or_typename TK_LBRACE enum_list maybecomma TK_RBRACE  */
#line 2762 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          pips_debug(1, "Reduction %d: TK_ENUM id_or_typename TK_LBRACE enum_list maybecomma TK_RBRACE -> type_spec\n", __LINE__);
                          string en = (yyvsp[-4].string);
                          list ml = (yyvsp[-2].liste);
                          /* Create the enum entity */
                          entity ent = MakeDerivedEntity(en,ml,is_external,is_type_enum);
                          RecordDerivedEntityDeclaration(ent);
                          variable v = make_variable(make_basic_derived(ent),NIL,NIL);
 
                          InitializeEnumMemberValues(ml);
                          c_parser_context_type(ycontext) = make_type_variable(v);
                          list rl = CONS(ENTITY, ent, NIL);
                          (yyval.liste) = rl;
                        }
#line 5531 "cyacc.tab.c"
    break;
 
  case 227: /* type_spec: TK_ENUM TK_LBRACE enum_list maybecomma TK_RBRACE  */
#line 2777 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* Create the enum entity with unique name */
                          string n = int2a(derived_counter++);
                          string s = strdup(concatenate(DUMMY_ENUM_PREFIX,n,NULL));
                          free(n);
                          entity ent = MakeDerivedEntity(s,(yyvsp[-2].liste),is_external,is_type_enum);
                          variable v = make_variable(make_basic_derived(ent),NIL,NIL);
 
                          InitializeEnumMemberValues((yyvsp[-2].liste));
                          c_parser_context_type(ycontext) = make_type_variable(v);
                          (yyval.liste) = CONS(ENTITY,ent,NIL);
                        }
#line 5548 "cyacc.tab.c"
    break;
 
  case 228: /* type_spec: TK_NAMED_TYPE  */
#line 2790 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          entity ent;
                          ent = FindOrCreateEntityFromLocalNameAndPrefix((yyvsp[0].string),TYPEDEF_PREFIX,is_external);
 
                          /* Specify the type of the variable that follows this declaration specifier */
                          if (c_parser_context_typedef(ycontext))
                            {
                              /* typedef T1 T2 => the type of T2 will be that of T1*/
                              pips_debug(8,"typedef T1 T2 where T1 =  %s\n",entity_name(ent));
                              c_parser_context_type(ycontext) = entity_type(ent);
                              (yyval.liste) = CONS(ENTITY,ent,NIL);
                            }
                          else
                            {
                              /* T1 var => the type of var is basic typedef */
                              variable v = make_variable(make_basic_typedef(ent),NIL,NIL);
                              pips_debug(8,"T1 var where T1 =  %s\n",entity_name(ent));
                              c_parser_context_type(ycontext) = make_type_variable(v);
                              (yyval.liste) = NIL;
                            }
 
                        }
#line 5575 "cyacc.tab.c"
    break;
 
  case 229: /* type_spec: TK_TYPEOF TK_LPAREN expression TK_RPAREN  */
#line 2813 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          CParserError("TYPEOF not implemented\n");
                        }
#line 5583 "cyacc.tab.c"
    break;
 
  case 230: /* type_spec: TK_TYPEOF TK_LPAREN type_name TK_RPAREN  */
#line 2817 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          CParserError("TYPEOF not implemented\n");
                        }
#line 5591 "cyacc.tab.c"
    break;
 
  case 231: /* struct_decl_list: %empty  */
#line 2825 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                    { pips_debug(1, "Reduction %d: empty -> struct_decl_list\n", __LINE__); (yyval.liste) = NIL; }
#line 5597 "cyacc.tab.c"
    break;
 
  case 232: /* struct_decl_list: decl_spec_list TK_SEMICOLON struct_decl_list  */
#line 2827 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          pips_debug(1, "Reduction %d:decl_spec_list TK_SEMICOLON struct_decl_list  -> struct_decl_list\n", __LINE__);
                          //c_parser_context ycontext = stack_head(ContextStack);
                          c_parser_context ycontext = GetContext();
                          /* Create the struct member entity with unique name, the name of the
                             struct/union is added to the member name prefix */
              string istr = int2a(derived_counter++);
                          string s = strdup(concatenate("PIPS_MEMBER_",istr,NULL));
                          string derived = code_decls_text((code) stack_head(StructNameStack));
                          entity ent = CreateEntityFromLocalNameAndPrefix(s,strdup(concatenate(derived,
                                                                                               MEMBER_SEP_STRING,NULL)),
                                                                          is_external);
                          pips_debug(5,"Current derived name: %s\n",derived);
                          pips_debug(5,"Member name: %s\n",entity_name(ent));
                          entity_storage(ent) = make_storage_rom();
                          entity_type(ent) = c_parser_context_type(ycontext);
              free(s);
 
                          /* Temporally put the list of struct/union
                             entities defined in $1 to initial value
                             of ent. FI: where is it retrieved? in
                             TakeDerivedEntities()? */
                          entity_initial(ent) = (value) (yyvsp[-2].liste);
 
                          (yyval.liste) = CONS(ENTITY,ent,(yyvsp[0].liste));
 
                          //stack_pop(ContextStack);
                          PopContext();
                        }
#line 5631 "cyacc.tab.c"
    break;
 
  case 233: /* $@17: %empty  */
#line 2857 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          //c_parser_context ycontext = stack_head(ContextStack);
                          c_parser_context ycontext = GetContext();
                          /* Add struct/union name and MEMBER_SEP_STRING to entity name */
                          string derived = code_decls_text((code) stack_head(StructNameStack));
                          string stf = (c_parser_context_scope(ycontext));
                          c_parser_context_scope(ycontext) = CreateMemberScope(derived,is_external);
                          free(stf);
                          c_parser_context_storage(ycontext) = make_storage_rom();
                        }
#line 5646 "cyacc.tab.c"
    break;
 
  case 234: /* struct_decl_list: decl_spec_list $@17 field_decl_list TK_SEMICOLON struct_decl_list  */
#line 2868 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          pips_debug(1, "Reduction %d: decl_spec_list field_decl_list TK_SEMICOLON struct_decl_list -> struct_decl_list\n", __LINE__);
                          /* Update the entity in field_decl_list with final type, storage, initial value*/
 
                          UpdateDerivedEntities((yyvsp[-4].liste),(yyvsp[-2].liste),ContextStack);
 
                          /* Create the list of member entities */
                          list l1 = (yyvsp[-2].liste);
                          list l2 = (yyvsp[0].liste);
                          list nl2 = NIL;
                          FOREACH(ENTITY, e, l2) {
                            if(!gen_in_list_p(e, l1))
                              nl2 = CONS(ENTITY, e, nl2);
                          }
                          nl2 = gen_nreverse(nl2);
                          list rl = gen_nconc(l1, nl2);
                          gen_free_list(l2);
                          (yyval.liste) = rl;
                          PopContext();
 
                          /* This code is not good ...
                             I have problem with the global variable ycontext and recursion: ycontext is crushed
                             when this decl_spec_list in struct_decl_list is entered, so the scope and storage
                             of the new context are given to the old context, before it is pushed in the stack.
 
                             For the moment, I reset the changed values of the context, by hoping that in C,
                             before a STRUCT/UNION declaration, there is no extern, ... */
                          free(c_parser_context_scope(ycontext));
                          c_parser_context_scope(ycontext) = empty_scope();
                          c_parser_context_storage(ycontext) = storage_undefined;
                        }
#line 5682 "cyacc.tab.c"
    break;
 
  case 235: /* struct_decl_list: error TK_SEMICOLON struct_decl_list  */
#line 2900 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          CParserError("Parse error: error TK_SEMICOLON struct_decl_list\n");
                        }
#line 5690 "cyacc.tab.c"
    break;
 
  case 236: /* field_decl_list: field_decl  */
#line 2907 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          entity f = (yyvsp[0].entity);
                          (yyval.liste) = CONS(ENTITY, f,NIL);
                        }
#line 5699 "cyacc.tab.c"
    break;
 
  case 237: /* field_decl_list: field_decl TK_COMMA field_decl_list  */
#line 2912 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          entity f = (yyvsp[-2].entity);
                          (yyval.liste) = CONS(ENTITY,f,(yyvsp[0].liste));
                        }
#line 5708 "cyacc.tab.c"
    break;
 
  case 238: /* field_decl: declarator  */
#line 2920 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* For debugging... */
                          /* It's probably the last place where you
                             can use the qualifier from the context to
                             update the type of e when e is a pointer. */
                          entity e = (yyvsp[0].entity);
                          type t = entity_type(e);
 
                          /* FI: Well, this piece of code may be fully
                             useless because t or pt is always undefined. */
                          if(false && !type_undefined_p(t)) {
                            type ut = ultimate_type(t);
 
                            if(pointer_type_p(ut)) {
                              type pt = type_to_final_pointed_type(ut);
                              if(!type_undefined_p(pt) && type_variable_p(pt)) {
                                variable v = type_variable(pt);
                                list ql = c_parser_context_qualifiers(ycontext);
                                pips_assert("the current qualifier list is empty",
                                            ENDP(variable_qualifiers(v)));
                                /* FI: because of the above assert, the
                                   next statement could be simplified */
                                variable_qualifiers(v) =
                                  gen_nconc(variable_qualifiers(v), ql);
                                c_parser_context_qualifiers(ycontext) = NIL;
                              }
                            }
                          }
 
                          (yyval.entity) = e;
                        }
#line 5744 "cyacc.tab.c"
    break;
 
  case 239: /* field_decl: declarator TK_COLON expression  */
#line 2952 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          value nv = EvalExpression((yyvsp[0].expression));
                          constant c = value_constant_p(nv)?
                            value_constant(nv) : make_constant_unknown();
                          symbolic s = make_symbolic((yyvsp[0].expression), c);
                          variable v = make_variable(make_basic_bit(s),NIL,NIL);
 
                          /*pips_assert("Width of bit-field must be a positive constant integer",
                            integer_constant_expression_p($3)); */
                          /* Ignore for this moment if the bit is signed or unsigned */
                          entity_type((yyvsp[-2].entity)) = make_type_variable(v);
                          (yyval.entity) = (yyvsp[-2].entity);
                        }
#line 5762 "cyacc.tab.c"
    break;
 
  case 240: /* field_decl: TK_COLON expression  */
#line 2966 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          //c_parser_context ycontext = stack_head(ContextStack);
                          c_parser_context ycontext = GetContext();
                          /* Unnamed bit-field : special and unique name */
                          string n = int2a(derived_counter++);
                          string s = strdup(concatenate(DUMMY_MEMBER_PREFIX,n,NULL));
                          entity ent = CreateEntityFromLocalNameAndPrefix(s,c_parser_context_scope(ycontext),is_external);
                          value nv = EvalExpression((yyvsp[0].expression));
                          constant c = value_constant_p(nv)?
                            value_constant(nv) : make_constant_unknown();
                          symbolic se = make_symbolic((yyvsp[0].expression), c);
                          variable v = make_variable(make_basic_bit(se),NIL,NIL);
                          /* pips_assert("Width of bit-field must be a positive constant integer",
                             integer_constant_expression_p($2)); */
                          entity_type(ent) = make_type_variable(v);
              free(n);
                          (yyval.entity) = ent;
                        }
#line 5785 "cyacc.tab.c"
    break;
 
  case 241: /* enum_list: enumerator  */
#line 2988 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* initial_value = 0 or $3*/
                          (yyval.liste) = CONS(ENTITY,(yyvsp[0].entity),NIL);
                          enum_counter = 1;
                        }
#line 5795 "cyacc.tab.c"
    break;
 
  case 242: /* enum_list: enum_list TK_COMMA enumerator  */
#line 2994 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* Attention to the reverse recursive definition*/
                          (yyval.liste) = gen_nconc((yyvsp[-2].liste),CONS(ENTITY,(yyvsp[0].entity),NIL));
                          enum_counter ++;
                        }
#line 5805 "cyacc.tab.c"
    break;
 
  case 243: /* enum_list: enum_list TK_COMMA error  */
#line 3000 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          CParserError("Parse error: enum_list TK_COMMA error\n");
                        }
#line 5813 "cyacc.tab.c"
    break;
 
  case 244: /* enumerator: TK_IDENT  */
#line 3007 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* Create an entity of is_basic_int, storage rom
                             initial_value = 0 if it is the first member
                             initial_value = intial_value(precedessor) + 1
 
                          No need to add current struct/union/enum name to the name's scope of the member entity
                          for ENUM, as in the case of STRUCT and UNION */
 
                          entity ent = CreateEntityFromLocalNameAndPrefix((yyvsp[0].string),"",is_external);
                      free((yyvsp[0].string));
                          variable v = make_variable(make_basic_int(DEFAULT_INTEGER_TYPE_SIZE),NIL,NIL);
                          type rt = make_type(is_type_variable, v);
                          functional f = make_functional(NIL, rt);
 
                          entity_storage(ent) = make_storage_rom();
                          entity_type(ent) = make_type_functional(f);
                          /* The information is not yet available, but
                             I need to recognize this entity as
                             symbolic for next rule */
                          entity_initial(ent) = make_value_symbolic(make_symbolic(expression_undefined, make_constant_unknown()));
                          // enum_list is not available yet. Values should be fixed later.
                          /*  entity_initial(ent) = MakeEnumeratorInitialValue(enum_list,enum_counter);*/
                          (yyval.entity) = ent;
                        }
#line 5842 "cyacc.tab.c"
    break;
 
  case 245: /* enumerator: TK_IDENT TK_EQ expression  */
#line 3032 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* Create an entity of is_basic_int, storage rom, initial_value = $3 */
                          /* No, enum member must be functional
                             entity, just like Fortran's parameters */
                          //int i;
                          value vinit = value_undefined;
                          entity ent = CreateEntityFromLocalNameAndPrefix((yyvsp[-2].string),"",is_external);
                          free((yyvsp[-2].string));
                          variable v =
                            make_variable(make_basic_int(DEFAULT_INTEGER_TYPE_SIZE),NIL,NIL);
                          type rt = make_type(is_type_variable, v);
                          functional f = make_functional(NIL, rt);
 
                          //pips_assert("Enumerated value must be a constant integer",
                          //          signed_integer_constant_expression_p($3));
                          //i = signed_integer_constant_expression_value($3);
                          vinit = EvalExpression((yyvsp[0].expression));
                          entity_storage(ent) = make_storage_rom();
                          entity_type(ent) = make_type_functional(f);
 
                          if(value_constant_p(vinit) && constant_int_p(value_constant(vinit))) {
                            entity_initial(ent) =
                              make_value_symbolic(make_symbolic((yyvsp[0].expression), value_constant(vinit)));
                          }
                          else {
                            /* Error or reference to a previous member of the same enum (enum04.c) */
                            /* FI: it might be easier to delay systematically the evaluation */
                            bool is_ok = false;
                            if(expression_call_p((yyvsp[0].expression))) {
                              call c = syntax_call(expression_syntax((yyvsp[0].expression)));
                              entity m = call_function(c);
 
                              if(entity_symbolic_p(m)) {
                                is_ok = true;
                              }
                            }
                            if(is_ok)
                              entity_initial(ent) =
                                make_value_symbolic(make_symbolic((yyvsp[0].expression), make_constant_unknown()));
                            else {
                              /* Let's try to delay evaluation anyway (enum05.c) */
                              entity_initial(ent) =
                                make_value_symbolic(make_symbolic((yyvsp[0].expression), make_constant_unknown()));
                              //pips_internal_error("Constant integer expression not evaluated\n");
                            }
                          }
 
                          (yyval.entity) = ent;
                        }
#line 5896 "cyacc.tab.c"
    break;
 
  case 246: /* declarator: pointer_opt direct_decl attributes_with_asm  */
#line 3085 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* Update the type of the direct_decl entity with pointer_opt and attributes*/
                          if (!type_undefined_p((yyvsp[-2].type)))
                            UpdatePointerEntity((yyvsp[-1].entity),(yyvsp[-2].type),(yyvsp[0].liste));
                          else if(!entity_undefined_p((yyvsp[-1].entity)) &&!ENDP((yyvsp[0].liste)) ) {
                    if(type_undefined_p(entity_type((yyvsp[-1].entity)))) {
                                                entity_type((yyvsp[-1].entity)) = make_type_variable(
                                                        make_variable(
                                                                basic_undefined,
                                                                NIL,
                                                                (yyvsp[0].liste)
                                                        )
                                                );
                    }
                                        else if( type_variable_p(entity_type((yyvsp[-1].entity)) ) ){
                                variable v = type_variable(entity_type((yyvsp[-1].entity)));
                                                variable_qualifiers(v)=gen_nconc(variable_qualifiers(v),(yyvsp[0].liste));
                                        }
                                        else  {
                                                c_parser_user_warning("some _asm(..) attributes are going to be lost for entity `%s'\n",entity_name((yyvsp[-1].entity)));
                                        }
              }
                          (yyval.entity) = (yyvsp[-1].entity);
                        }
#line 5925 "cyacc.tab.c"
    break;
 
  case 247: /* direct_decl: id_or_typename  */
#line 3115 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* FI: A variable cannot be redeclared
                             within the same scope, but this is not
                             checked yet. */
                          entity e = FindOrCreateCurrentEntity((yyvsp[0].string),ContextStack,FormalStack,FunctionStack,is_external);
                          /* Initialize the type stack and push the
                             type of found/created entity to the
                             stack.  It can be undefined if the entity
                             has not been parsed, or a given type
                             which is used later to check if the
                             declarations are the same for one entity.
                             This stack is put temporarily in the
                             storage of the entity, not a global
                             variable for each declarator to avoid
                             being erased by recursion (FI: this last
                             sentence seems to be wrong) */
                          stack s = get_from_entity_type_stack_table(e);
                          if(stack_undefined_p(s)) {
                            s = stack_make(type_domain,0,0);
                            stack_push((char *) entity_type(e),s);
                            put_to_entity_type_stack_table(e,s);
                          }
                          else {
                            /* e has already been defined since a type
                               stack is associated to it. At least, if
                               the mapping from entity to type stack
                               is well managed. Since entities are
                               sometimes destroyed, a new entity might
                               end up with the same memory address and
                               hence the same type stack. */
                            entity cm = get_current_module_entity();
                            /* A function can be redeclared inside itself. see C_syntax/extern.c */
                            if(cm!=e) {
                              /* Dummy parameters can also be redeclared
                                 as long as their types are equal */
                              if(dummy_parameter_entity_p(e)) {
                                c_parser_user_warning("Dummy parameter \"%s\" is redefined.\n",
                                                      entity_user_name(e));
                                CParserError("Dummy redefinition accepted by gcc but not compatible with ISO standard."
                                             " Try to compile with \"gcc -ansi -c\"\n");
                              }
                              else {
                                type t = (type) stack_head(s);
                                if(type_undefined_p(t)) {
                                  c_parser_user_warning("Symbol \"%s\" is redefined.\n",
                                                        entity_user_name(e) /* entity_name(e)*/);
                                }
                                else if(type_functional_p(t)) {
                                  c_parser_user_warning("Function \"%s\" is redefined.\n",
                                                        entity_user_name(e) /* entity_name(e)*/);
                                }
                                else {
                                c_parser_user_warning("Variable \"%s\" is redefined.\n",
                                                      entity_user_name(e) /* entity_name(e)*/);
                                CParserError("Variable redefinitions are not compatible with ISO standard."
                                             " Try to compile with \"gcc -ansi -c\"\n");
                                }
                              }
                            }
                          }
 
                          entity_type(e) = type_undefined;
                          //discard_C_comment();
                          //push_current_C_comment();
                          (yyval.entity) = e;
                        }
#line 5996 "cyacc.tab.c"
    break;
 
  case 248: /* direct_decl: TK_LPAREN attributes declarator TK_RPAREN  */
#line 3182 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* Add attributes such as const, restrict, ... to variable's qualifiers */
                          UpdateParenEntity((yyvsp[-1].entity), (yyvsp[-2].liste));
                          (yyval.entity) = (yyvsp[-1].entity);
                          stack_push((char *) entity_type((yyval.entity)),
                             get_from_entity_type_stack_table((yyval.entity)));
                          // FI: if I rely on the stack, I won't know for a while what
                          // this entity is. And I'd like to make a difference between
                          // a function and a pointer to a function before I declare
                          // dummy arguments. But Nga's design has to be redone:-(.
                          entity_type((yyval.entity)) = type_undefined;
                        }
#line 6013 "cyacc.tab.c"
    break;
 
  case 249: /* direct_decl: direct_decl TK_LBRACKET attributes comma_expression_opt TK_RBRACKET  */
#line 3195 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                         /* This is the last dimension of an array (i.e a[1][2][3] => [3]).
                            Questions:
                             - What can be attributes ?
                             - Why comma_expression, it can be a list of expressions ?
                             - When the comma_expression is empty (corresponding to the first dimension),
                               the array is of unknown size => can be determined by the intialization ? TO BE DONE*/
                          list el = (yyvsp[-1].liste);
                          if(gen_length(el)<=1)
                            UpdateArrayEntity((yyvsp[-4].entity),(yyvsp[-2].liste),el);
                          else {
                            expression d = MakeCommaExpression(el);
                            UpdateArrayEntity((yyvsp[-4].entity),(yyvsp[-2].liste),CONS(EXPRESSION, d, NIL));
                          }
                        }
#line 6033 "cyacc.tab.c"
    break;
 
  case 250: /* direct_decl: direct_decl TK_LBRACKET attributes error TK_RBRACKET  */
#line 3211 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          CParserError("Parse error: direct_decl TK_LBRACKET attributes error TK_RBRACKET\n");
                        }
#line 6041 "cyacc.tab.c"
    break;
 
  case 251: /* $@18: %empty  */
#line 3215 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* Well, here it can be a function or a pointer to a function */
                          entity e = (yyvsp[-1].entity); //RenameFunctionEntity($1);
                          if (value_undefined_p(entity_initial(e))
                              ||value_unknown_p(entity_initial(e))) {
                            /* If it is a pointer, its value is going
                               to be "unknown" or "expression"; if it is
                               a function, its value is going to be
                               "code". If the value cannot stay
                               undefined, it should be made
                               unknown... */
                            entity_initial(e) = make_value(is_value_code,make_code(NIL,strdup(""),make_sequence(NIL), NIL, make_language_c()));
                            //entity_initial(e) = make_value_unknown();
                          }
                          //pips_assert("e is a module", module_name_p(entity_module_name(e)));
                          PushFunction(e);
                        }
#line 6063 "cyacc.tab.c"
    break;
 
  case 252: /* direct_decl: direct_decl parameter_list_startscope $@18 rest_par_list TK_RPAREN  */
#line 3233 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          entity m = get_current_module_entity();
                          entity e = GetFunction();
                          entity ne = e;
                            pips_assert("ne is an entity",
                                        entity_domain_number(ne)==entity_domain);
                          PopFunction();
                          stack_pop(FormalStack);
                          StackPop(OffsetStack);
                          /* Intrinsic functions in C such as printf, fprintf, ... are considered
                             as entities with functional type ???
                             if (!intrinsic_entity_p(e))*/
                          /* e can be a function or a pointer to a
                             function. The information is available
                             somewhere in the stacks... */
                          stack ts = get_from_entity_type_stack_table(e);
                          if(!stack_undefined_p(ts)) {
                            type et = (type) stack_head(ts);
                            if(type_undefined_p(et))
                              ne = RenameFunctionEntity(e);
                            else if(!type_variable_p(et))
                              ne = RenameFunctionEntity(e);
                          }
                            pips_assert("ne is an entity",
                                        entity_domain_number(ne)==entity_domain);
                          UpdateFunctionEntity(ne,(yyvsp[-1].liste));
                            pips_assert("ne is an entity",
                                        entity_domain_number(ne)==entity_domain);
                          /* No need to declare C user functions
                             extern in a compilation unit; they are
                             global or local. */
                          if(!entity_undefined_p(m)
                             && compilation_unit_entity_p(m)
                             && !intrinsic_entity_p(ne)) {
                            /* Too early: pointers to functions are still
                             * seen as functions here. Let's delay
                             */
                            // RemoveFromExterns(ne);
                            pips_assert("ne is an entity",
                                        entity_domain_number(ne)==entity_domain);
                            removable_extern_entities =
                              CONS(ENTITY, ne, removable_extern_entities);
                          }
                          (yyval.entity) = ne;
                        }
#line 6113 "cyacc.tab.c"
    break;
 
  case 253: /* parameter_list_startscope: TK_LPAREN  */
#line 3281 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          stack_push((char *) make_basic_logical(true), FormalStack);
                          stack_push((char *) make_basic_int(1),OffsetStack);
                        }
#line 6122 "cyacc.tab.c"
    break;
 
  case 254: /* rest_par_list: %empty  */
#line 3288 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { (yyval.liste) = NIL; }
#line 6128 "cyacc.tab.c"
    break;
 
  case 255: /* rest_par_list: parameter_decl rest_par_list1  */
#line 3290 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.liste) = CONS(PARAMETER,(yyvsp[-1].parameter),(yyvsp[0].liste));
                        }
#line 6136 "cyacc.tab.c"
    break;
 
  case 256: /* rest_par_list1: %empty  */
#line 3295 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { (yyval.liste) = NIL; }
#line 6142 "cyacc.tab.c"
    break;
 
  case 257: /* $@19: %empty  */
#line 3297 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          StackPush(OffsetStack);
                        }
#line 6150 "cyacc.tab.c"
    break;
 
  case 258: /* rest_par_list1: TK_COMMA $@19 TK_ELLIPSIS  */
#line 3301 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /*$$ = CONS(PARAMETER,make_parameter(make_type_varargs(type_undefined),
                            make_mode(CurrentMode,UU), make_dummy_unknown()),NIL); */
                          type at = make_type(is_type_variable,
                                              make_variable(make_basic(is_basic_overloaded, UU),
                                                            NIL, NIL));
                          (yyval.liste) = CONS(PARAMETER,
                                    make_parameter(make_type_varargs(at),
                                                   make_mode(CurrentMode,UU),
                                                   make_dummy_unknown()),
                                    NIL);
                        }
#line 6167 "cyacc.tab.c"
    break;
 
  case 259: /* $@20: %empty  */
#line 3314 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          StackPush(OffsetStack);
                        }
#line 6175 "cyacc.tab.c"
    break;
 
  case 260: /* rest_par_list1: TK_COMMA $@20 parameter_decl rest_par_list1  */
#line 3318 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.liste) = CONS(PARAMETER,(yyvsp[-1].parameter),(yyvsp[0].liste));
                        }
#line 6183 "cyacc.tab.c"
    break;
 
  case 261: /* parameter_decl: decl_spec_list declarator  */
#line 3325 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          UpdateEntity((yyvsp[0].entity),ContextStack,FormalStack,FunctionStack,OffsetStack,is_external,false);
                          (yyval.parameter) = make_parameter(copy_type(entity_type((yyvsp[0].entity))),
                                              make_mode(CurrentMode,UU),
                                              make_dummy_identifier((yyvsp[0].entity))); //FI: or should it
                          // be entity_undefined? Are we parsing a compilation unit or a function?
                          /* Set CurentMode where ???? */
                          //stack_pop(ContextStack);
                          PopContext();
                        }
#line 6198 "cyacc.tab.c"
    break;
 
  case 262: /* parameter_decl: decl_spec_list abstract_decl  */
#line 3336 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          UpdateAbstractEntity((yyvsp[0].entity),ContextStack);
                          (yyval.parameter) = make_parameter(copy_type(entity_type((yyvsp[0].entity))),
                                              make_mode(CurrentMode,UU),
                                              make_dummy_unknown()); //FI: to be checked
                          RemoveFromExterns((yyvsp[0].entity));
                          gen_remove(&removable_extern_entities, (void *) (yyvsp[0].entity));
                          free_entity((yyvsp[0].entity));
                          //stack_pop(ContextStack);
                          PopContext();
                        }
#line 6214 "cyacc.tab.c"
    break;
 
  case 263: /* parameter_decl: decl_spec_list  */
#line 3348 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          c_parser_context ycontext = stack_head(ContextStack);
                          (yyval.parameter) = make_parameter(copy_type(c_parser_context_type(ycontext)),
                                              make_mode(CurrentMode,UU),
                                              make_dummy_unknown());
                          /* function prototype*/
                          //stack_pop(ContextStack);
                          PopContext();
                        }
#line 6228 "cyacc.tab.c"
    break;
 
  case 264: /* parameter_decl: TK_LPAREN parameter_decl TK_RPAREN  */
#line 3358 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { (yyval.parameter) = (yyvsp[-1].parameter); }
#line 6234 "cyacc.tab.c"
    break;
 
  case 265: /* old_proto_decl: pointer_opt direct_old_proto_decl  */
#line 3364 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          if (!type_undefined_p((yyvsp[-1].type)))
                            UpdatePointerEntity((yyvsp[0].entity),(yyvsp[-1].type),NIL);
                          (yyval.entity) = (yyvsp[0].entity);
                        }
#line 6244 "cyacc.tab.c"
    break;
 
  case 266: /* $@21: %empty  */
#line 3373 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          entity e = (yyvsp[-1].entity); //RenameFunctionEntity($1);
                          if (value_undefined_p(entity_initial(e)))
                            entity_initial((yyvsp[-1].entity)) = make_value(is_value_code,make_code(NIL,strdup(""),make_sequence(NIL),NIL, make_language_c()));
                          //pips_assert("e is a module", module_name_p(entity_module_name(e)));
                          PushFunction(e);
                          stack_push((char *) make_basic_logical(true),FormalStack);
                          stack_push((char *) make_basic_int(1),OffsetStack);
                        }
#line 6258 "cyacc.tab.c"
    break;
 
  case 267: /* direct_old_proto_decl: direct_decl TK_LPAREN $@21 old_parameter_list_ne TK_RPAREN old_pardef_list  */
#line 3383 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          entity e = GetFunction();
                          list paras = MakeParameterList((yyvsp[-2].liste),(yyvsp[0].liste),FunctionStack);
                          PopFunction();
                          stack_pop(FormalStack);
                          StackPop(OffsetStack);
                          (void) UpdateFunctionEntity(e, paras);
                          //CreateReturnEntity(e);
                          gen_free_list((yyvsp[-2].liste));
                          (yyval.entity) = e;
                        }
#line 6274 "cyacc.tab.c"
    break;
 
  case 268: /* old_parameter_list_ne: TK_IDENT  */
#line 3404 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.liste) = CONS(STRING,(yyvsp[0].string),NIL);
                        }
#line 6282 "cyacc.tab.c"
    break;
 
  case 269: /* old_parameter_list_ne: TK_IDENT TK_COMMA old_parameter_list_ne  */
#line 3408 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.liste) = CONS(STRING,(yyvsp[-2].string),(yyvsp[0].liste));
                        }
#line 6290 "cyacc.tab.c"
    break;
 
  case 270: /* old_pardef_list: %empty  */
#line 3414 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { (yyval.liste) = NIL; }
#line 6296 "cyacc.tab.c"
    break;
 
  case 271: /* old_pardef_list: decl_spec_list old_pardef TK_SEMICOLON TK_ELLIPSIS  */
#line 3416 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          UpdateEntities((yyvsp[-2].liste),ContextStack,FormalStack,FunctionStack,OffsetStack,is_external,false);
                          //stack_pop(ContextStack);
                          PopContext();
                          /* Can we have struct/union definition in $1 ?*/
                          /*$$ = gen_nconc($1,$2);*/
                          (yyval.liste) = (yyvsp[-2].liste);
                        }
#line 6309 "cyacc.tab.c"
    break;
 
  case 272: /* old_pardef_list: decl_spec_list old_pardef TK_SEMICOLON old_pardef_list  */
#line 3425 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* Rule used for C_syntax/activate.c,
                             decl33.c and adi.c. CreateReturnEntity()
                             only useful for activate.c  */
                          list el = (yyvsp[-2].liste);
                          entity f = stack_head(FunctionStack);
                          SubstituteDummyParameters(f, el);
                          UpdateEntities(el,ContextStack,FormalStack,FunctionStack,OffsetStack,is_external,false);
                          // The functional type of f could be
                          // completed with the parameter types...
                          CreateReturnEntity(f);
                          //stack_pop(ContextStack);
                          PopContext();
                          /* Can we have struct/union definition in $1 ?*/
                          /*$$ = gen_nconc($1,gen_nconc(el,$4));*/
                          (yyval.liste) = gen_nconc(el,(yyvsp[0].liste));
                        }
#line 6331 "cyacc.tab.c"
    break;
 
  case 273: /* old_pardef: declarator  */
#line 3446 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.liste) = CONS(ENTITY,(yyvsp[0].entity),NIL);
                        }
#line 6339 "cyacc.tab.c"
    break;
 
  case 274: /* old_pardef: declarator TK_COMMA old_pardef  */
#line 3450 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.liste) = CONS(ENTITY,(yyvsp[-2].entity),(yyvsp[0].liste));
                        }
#line 6347 "cyacc.tab.c"
    break;
 
  case 275: /* old_pardef: error  */
#line 3454 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          CParserError("Parse error: error \n");
                        }
#line 6355 "cyacc.tab.c"
    break;
 
  case 276: /* pointer: TK_STAR attributes pointer_opt  */
#line 3461 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { /* decl24.c, decl50.c, decl51.c, decl52.c,
                             decl53.c :
                             const attribute lost or misplaced for pointers */
                          list al = (yyvsp[-1].liste);
                          type t = (yyvsp[0].type);
                          //c_parser_context_qualifiers(ycontext) =
                          //  gen_nconc(c_parser_context_qualifiers(ycontext), al);
                          (yyval.type) = make_type_variable(make_variable(make_basic_pointer(t), NIL, al));
                          //c_parser_context_qualifiers(ycontext) = NIL;
                        }
#line 6370 "cyacc.tab.c"
    break;
 
  case 277: /* pointer_opt: %empty  */
#line 3474 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { (yyval.type) = type_undefined;}
#line 6376 "cyacc.tab.c"
    break;
 
  case 278: /* pointer_opt: pointer  */
#line 3475 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { }
#line 6382 "cyacc.tab.c"
    break;
 
  case 279: /* type_name: decl_spec_list abstract_decl  */
#line 3480 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          entity e = (yyvsp[0].entity);
                          list el = CONS(ENTITY, e, NIL);
                          UpdateAbstractEntity(e,ContextStack);
                          (yyval.type) = copy_type(entity_type(e));
                          RemoveFromExterns(e); // should be useless
                          gen_remove(&removable_extern_entities, (void *) e);
                          remove_entity_type_stacks(el);
                          gen_free_list(el);
                          free_entity(e);
                          //stack_pop(ContextStack);
                          PopContext();
                        }
#line 6400 "cyacc.tab.c"
    break;
 
  case 280: /* type_name: decl_spec_list  */
#line 3494 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          c_parser_context ycontext = stack_head(ContextStack);
                          (yyval.type) = c_parser_context_type(ycontext);
                          //stack_pop(ContextStack);
                          PopContext();
                        }
#line 6411 "cyacc.tab.c"
    break;
 
  case 281: /* abstract_decl: pointer_opt abs_direct_decl attributes  */
#line 3504 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* Update the type of the direct_decl entity with pointer_opt and attributes*/
                          if (!type_undefined_p((yyvsp[-2].type)))
                            UpdatePointerEntity((yyvsp[-1].entity),(yyvsp[-2].type),(yyvsp[0].liste));
                          (yyval.entity) = (yyvsp[-1].entity);
                        }
#line 6422 "cyacc.tab.c"
    break;
 
  case 282: /* abstract_decl: pointer  */
#line 3511 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          string n = int2a(abstract_counter++);
                          entity e = FindOrCreateCurrentEntity(strdup(concatenate(DUMMY_ABSTRACT_PREFIX,
                                                                                  n,NULL)),
                                                         ContextStack,
                                                         FormalStack,
                                                         FunctionStack,
                                                         is_external);
                          free(n);
                          UpdatePointerEntity(e,(yyvsp[0].type),NIL);
                          /* Initialize the type stack and push the type of found/created entity to the stack.
                             It can be undefined if the entity has not been parsed, or a given type which is
                             used later to check if the declarations are the same for one entity.
                             This stack is put temporarily in the storage of the entity, not a global variable
                             for each declarator to avoid being erased by recursion */
                          stack s = stack_make(type_domain, 0, 0);
                          //entity_storage($$) = (storage) s;
                          stack_push((char *) entity_type(e),s);
                          put_to_entity_type_stack_table(e, s);
                          /*entity_type($$) = type_undefined;*/
                          (yyval.entity) = e;
                        }
#line 6449 "cyacc.tab.c"
    break;
 
  case 283: /* abs_direct_decl: TK_LPAREN attributes abstract_decl TK_RPAREN  */
#line 3539 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          UpdateParenEntity((yyvsp[-1].entity),(yyvsp[-2].liste));
                          (yyval.entity) = (yyvsp[-1].entity);
                          stack_push((char *) entity_type((yyval.entity)),
                                     get_from_entity_type_stack_table((yyval.entity)));
                          entity_type((yyval.entity)) = type_undefined;
                        }
#line 6461 "cyacc.tab.c"
    break;
 
  case 284: /* abs_direct_decl: TK_LPAREN error TK_RPAREN  */
#line 3547 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          CParserError("Parse error: TK_LPAREN error TK_RPAREN\n");
                        }
#line 6469 "cyacc.tab.c"
    break;
 
  case 285: /* abs_direct_decl: abs_direct_decl_opt TK_LBRACKET comma_expression_opt TK_RBRACKET  */
#line 3552 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          UpdateArrayEntity((yyvsp[-3].entity),NIL,(yyvsp[-1].liste));
                        }
#line 6477 "cyacc.tab.c"
    break;
 
  case 286: /* $@22: %empty  */
#line 3557 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          entity e = (yyvsp[-1].entity); //RenameFunctionEntity($1);
                          if (value_undefined_p(entity_initial(e)))
                            entity_initial(e) = make_value(is_value_code,make_code(NIL,strdup(""),make_sequence(NIL),NIL, make_language_c()));
                          //pips_assert("e is a module", module_name_p(entity_module_name($1)));
                          PushFunction(e);
                        }
#line 6489 "cyacc.tab.c"
    break;
 
  case 287: /* abs_direct_decl: abs_direct_decl_opt parameter_list_startscope $@22 rest_par_list TK_RPAREN  */
#line 3565 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          entity e = GetFunction();
                          PopFunction();
                          stack_pop(FormalStack);
                          StackPop(OffsetStack);
                          (void) UpdateFunctionEntity(e,(yyvsp[-1].liste));
                          (yyval.entity) = e;
                        }
#line 6502 "cyacc.tab.c"
    break;
 
  case 288: /* abs_direct_decl_opt: abs_direct_decl  */
#line 3577 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { }
#line 6508 "cyacc.tab.c"
    break;
 
  case 289: /* abs_direct_decl_opt: %empty  */
#line 3578 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          string n = int2a(abstract_counter++);
                          entity e = FindOrCreateCurrentEntity(strdup(concatenate(DUMMY_ABSTRACT_PREFIX,
                                                                            n,NULL)),
                                                         ContextStack,FormalStack,
                                                         FunctionStack,
                                                         is_external);
                          free(n);
                          stack s = stack_make(type_domain,0,0);
                          //entity_storage($$) = (storage) s;
                          stack_push((char *) entity_type(e),s);
                          put_to_entity_type_stack_table(e, s);
                          entity_type(e) = type_undefined;
                          (yyval.entity) = e;
    }
#line 6528 "cyacc.tab.c"
    break;
 
  case 290: /* $@23: %empty  */
#line 3597 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          InitializeBlock();
                          is_external = false;
                        }
#line 6537 "cyacc.tab.c"
    break;
 
  case 291: /* function_def: function_def_start $@23 block  */
#line 3602 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* Make value_code for current module here */
                          //list dl = statement_declarations($3);
                          ModuleStatement = (yyvsp[0].statement);
                          pips_assert("Module statement is consistent",
                                      statement_consistent_p(ModuleStatement));
                          pips_assert("No illegal redundant declarations",
                                      check_declaration_uniqueness_p(ModuleStatement));
                          /* Let's delay this? ResetCurrentModule(); */
                          is_external = true;
                        }
#line 6553 "cyacc.tab.c"
    break;
 
  case 292: /* function_def_start: decl_spec_list declarator  */
#line 3616 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          UpdateEntity((yyvsp[0].entity),ContextStack,FormalStack,FunctionStack,OffsetStack,is_external, false);
                          //stack_pop(ContextStack);
                          PopContext();
                          pips_debug(2,"Create current module %s\n",entity_user_name((yyvsp[0].entity)));
                          MakeCurrentModule((yyvsp[0].entity));
                          reset_token_has_been_seen_p();
                          clear_C_comment();
                          pips_assert("Module is consistent\n",entity_consistent_p((yyvsp[0].entity)));
                        }
#line 6568 "cyacc.tab.c"
    break;
 
  case 293: /* function_def_start: decl_spec_list old_proto_decl  */
#line 3628 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          UpdateEntity((yyvsp[0].entity),ContextStack,FormalStack,FunctionStack,OffsetStack,is_external, false);
                          //stack_pop(ContextStack);
                          PopContext();
                          pips_debug(2,"Create current module %s with old-style prototype\n",entity_user_name((yyvsp[0].entity)));
                          MakeCurrentModule((yyvsp[0].entity));
                          reset_token_has_been_seen_p();
                          clear_C_comment();
                          pips_assert("Module is consistent\n",entity_consistent_p((yyvsp[0].entity)));
                        }
#line 6583 "cyacc.tab.c"
    break;
 
  case 294: /* $@24: %empty  */
#line 3640 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          entity oe = FindOrCreateEntity(TOP_LEVEL_MODULE_NAME,(yyvsp[-1].string));
                          free((yyvsp[-1].string));
                          entity e = oe; //RenameFunctionEntity(oe);
                          pips_debug(2,"Create current module \"%s\" with no return type\n",
                               entity_name(e));
                          MakeCurrentModule(e);
                          reset_token_has_been_seen_p();
                          clear_C_comment();
                          //pips_assert("e is a module", module_name_p(entity_module_name(e)));
                          PushFunction(e);
                        }
#line 6600 "cyacc.tab.c"
    break;
 
  case 295: /* function_def_start: TK_IDENT parameter_list_startscope $@24 rest_par_list TK_RPAREN  */
#line 3653 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          /* Functional type is unknown or int (by default) or void ?*/
                          //functional f = make_functional($4,make_type_unknown());
                          functional f = make_functional((yyvsp[-1].liste),MakeIntegerResult());
                          entity e = GetFunction();
                          entity_type(e) = make_type_functional(f);
                          pips_assert("Current module entity is consistent\n",entity_consistent_p(e));
                          // Too late for full UpdateEntity() but at
                          //least the return value and the formal
                          //parameters should be properly defined
                          //UpdateEntity(e,ContextStack,FormalStack,FunctionStack,OffsetStack,is_external,
                          //false);
                          UpdateEntity2(e, FormalStack, OffsetStack);
                          PopFunction();
                          stack_pop(FormalStack);
                          StackPop(OffsetStack);
                        }
#line 6622 "cyacc.tab.c"
    break;
 
  case 296: /* $@25: %empty  */
#line 3672 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          entity oe = FindOrCreateEntity(TOP_LEVEL_MODULE_NAME,(yyvsp[-2].string));
                          entity e= oe; //RenameFunctionEntity(oe);
                          pips_debug(2,"Create current module %s with no return type + old-style parameter list\n",(yyvsp[-2].string));
                          free((yyvsp[-2].string));
                          MakeCurrentModule(e);
                          clear_C_comment();
                          //pips_assert("e is a module", module_name_p(entity_module_name(e)));
                          PushFunction(e);
                          stack_push((char *) make_basic_logical(true),FormalStack);
                          stack_push((char *) make_basic_int(1),OffsetStack);
                        }
#line 6639 "cyacc.tab.c"
    break;
 
  case 297: /* function_def_start: TK_IDENT TK_LPAREN old_parameter_list_ne $@25 TK_RPAREN old_pardef_list  */
#line 3685 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          list paras = MakeParameterList((yyvsp[-3].liste),(yyvsp[0].liste),FunctionStack);
                          gen_free_list((yyvsp[-3].liste));
                          functional f = make_functional(paras,make_type_unknown());
                          entity e = GetFunction();
                          entity_type(e) = make_type_functional(f);
                          pips_assert("Current module entity is consistent\n",entity_consistent_p(e));
                          PopFunction();
                          stack_pop(FormalStack);
                          StackPop(OffsetStack);
                        }
#line 6655 "cyacc.tab.c"
    break;
 
  case 298: /* attributes: %empty  */
#line 3715 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { (yyval.liste) = NIL; }
#line 6661 "cyacc.tab.c"
    break;
 
  case 299: /* attributes: attribute attributes  */
#line 3718 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { (yyval.liste) = insert_qualifier((yyvsp[0].liste), (yyvsp[-1].qualifier));}
#line 6667 "cyacc.tab.c"
    break;
 
  case 300: /* attributes_with_asm: %empty  */
#line 3725 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { (yyval.liste) = NIL; }
#line 6673 "cyacc.tab.c"
    break;
 
  case 301: /* attributes_with_asm: attribute attributes_with_asm  */
#line 3727 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { (yyval.liste) = CONS(QUALIFIER,(yyvsp[-1].qualifier),(yyvsp[0].liste)); }
#line 6679 "cyacc.tab.c"
    break;
 
  case 302: /* attributes_with_asm: TK_ASM TK_LPAREN string_constant TK_RPAREN attributes  */
#line 3729 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { (yyval.liste) = CONS(QUALIFIER,make_qualifier_asm((yyvsp[-2].string)), (yyvsp[0].liste));}
#line 6685 "cyacc.tab.c"
    break;
 
  case 303: /* attribute: TK_MSATTR  */
#line 3741 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { CParserError("ATTRIBUTE not implemented\n"); }
#line 6691 "cyacc.tab.c"
    break;
 
  case 304: /* attribute: TK_CONST  */
#line 3744 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.qualifier) = make_qualifier_const();
                        }
#line 6699 "cyacc.tab.c"
    break;
 
  case 305: /* attribute: TK_RESTRICT  */
#line 3748 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.qualifier) = make_qualifier_restrict();
                        }
#line 6707 "cyacc.tab.c"
    break;
 
  case 306: /* attribute: TK_VOLATILE  */
#line 3752 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.qualifier) = make_qualifier_volatile();
                        }
#line 6715 "cyacc.tab.c"
    break;
 
  case 307: /* attribute: TK_STATIC_DIMENSION  */
#line 3756 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {
                          (yyval.qualifier) = make_qualifier_static_dimension();
                        }
#line 6723 "cyacc.tab.c"
    break;
 
  case 308: /* asmattr: %empty  */
#line 3871 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {  }
#line 6729 "cyacc.tab.c"
    break;
 
  case 309: /* asmattr: TK_VOLATILE asmattr  */
#line 3873 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { CParserError("ASM not implemented\n"); }
#line 6735 "cyacc.tab.c"
    break;
 
  case 310: /* asmattr: TK_CONST asmattr  */
#line 3875 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { CParserError("ASM not implemented\n"); }
#line 6741 "cyacc.tab.c"
    break;
 
  case 311: /* asmoutputs: %empty  */
#line 3880 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {  }
#line 6747 "cyacc.tab.c"
    break;
 
  case 312: /* asmoutputs: TK_COLON asmoperands asminputs  */
#line 3882 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { CParserError("ASM not implemented\n"); }
#line 6753 "cyacc.tab.c"
    break;
 
  case 313: /* asmoperands: %empty  */
#line 3886 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {  }
#line 6759 "cyacc.tab.c"
    break;
 
  case 314: /* asmoperands: asmoperandsne  */
#line 3888 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { CParserError("ASM not implemented\n"); }
#line 6765 "cyacc.tab.c"
    break;
 
  case 315: /* asmoperandsne: asmoperand  */
#line 3892 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { CParserError("ASM not implemented\n"); }
#line 6771 "cyacc.tab.c"
    break;
 
  case 316: /* asmoperandsne: asmoperandsne TK_COMMA asmoperand  */
#line 3894 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { CParserError("ASM not implemented\n"); }
#line 6777 "cyacc.tab.c"
    break;
 
  case 317: /* asmoperand: string_constant TK_LPAREN expression TK_RPAREN  */
#line 3898 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { CParserError("ASM not implemented\n"); }
#line 6783 "cyacc.tab.c"
    break;
 
  case 318: /* asmoperand: string_constant TK_LPAREN error TK_RPAREN  */
#line 3900 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { CParserError("ASM not implemented\n"); }
#line 6789 "cyacc.tab.c"
    break;
 
  case 319: /* asminputs: %empty  */
#line 3904 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {  }
#line 6795 "cyacc.tab.c"
    break;
 
  case 320: /* asminputs: TK_COLON asmoperands asmclobber  */
#line 3906 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { CParserError("ASM not implemented\n"); }
#line 6801 "cyacc.tab.c"
    break;
 
  case 321: /* asmclobber: %empty  */
#line 3910 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        {  }
#line 6807 "cyacc.tab.c"
    break;
 
  case 322: /* asmclobber: TK_COLON asmcloberlst_ne  */
#line 3912 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { CParserError("ASM not implemented\n"); }
#line 6813 "cyacc.tab.c"
    break;
 
  case 323: /* asmcloberlst_ne: one_string_constant  */
#line 3916 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { CParserError("ASM not implemented\n"); }
#line 6819 "cyacc.tab.c"
    break;
 
  case 324: /* asmcloberlst_ne: one_string_constant TK_COMMA asmcloberlst_ne  */
#line 3918 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"
                        { CParserError("ASM not implemented\n"); }
#line 6825 "cyacc.tab.c"
    break;
 
 
#line 6829 "cyacc.tab.c"
 
      default: break;
    }
  /* User semantic actions sometimes alter yychar, and that requires
     that yytoken be updated with the new translation.  We take the
     approach of translating immediately before every use of yytoken.
     One alternative is translating here after every semantic action,
     but that translation would be missed if the semantic action invokes
     YYABORT, YYACCEPT, or YYERROR immediately after altering yychar or
     if it invokes YYBACKUP.  In the case of YYABORT or YYACCEPT, an
     incorrect destructor might then be invoked immediately.  In the
     case of YYERROR or YYBACKUP, subsequent parser actions might lead
     to an incorrect destructor call or verbose syntax error message
     before the lookahead is translated.  */
  YY_SYMBOL_PRINT ("-> $$ =", YY_CAST (yysymbol_kind_t, yyr1[yyn]), &yyval, &yyloc);
 
  YYPOPSTACK (yylen);
  yylen = 0;
 
  *++yyvsp = yyval;
 
  /* Now 'shift' the result of the reduction.  Determine what state
     that goes to, based on the state we popped back to and the rule
     number reduced by.  */
  {
    const int yylhs = yyr1[yyn] - YYNTOKENS;
    const int yyi = yypgoto[yylhs] + *yyssp;
    yystate = (0 <= yyi && yyi <= YYLAST && yycheck[yyi] == *yyssp
               ? yytable[yyi]
               : yydefgoto[yylhs]);
  }
 
  goto yynewstate;
 
 
/*--------------------------------------.
| yyerrlab -- here on detecting error.  |
`--------------------------------------*/
yyerrlab:
  /* Make sure we have latest lookahead translation.  See comments at
     user semantic actions for why this is necessary.  */
  yytoken = yychar == YYEMPTY ? YYSYMBOL_YYEMPTY : YYTRANSLATE (yychar);
  /* If not already recovering from an error, report this error.  */
  if (!yyerrstatus)
    {
      ++yynerrs;
      yyerror (YY_("syntax error"));
    }
 
  if (yyerrstatus == 3)
    {
      /* If just tried and failed to reuse lookahead token after an
         error, discard it.  */
 
      if (yychar <= YYEOF)
        {
          /* Return failure if at end of input.  */
          if (yychar == YYEOF)
            YYABORT;
        }
      else
        {
          yydestruct ("Error: discarding",
                      yytoken, &yylval);
          yychar = YYEMPTY;
        }
    }
 
  /* Else will try to reuse lookahead token after shifting the error
     token.  */
  goto yyerrlab1;
 
 
/*---------------------------------------------------.
| yyerrorlab -- error raised explicitly by YYERROR.  |
`---------------------------------------------------*/
yyerrorlab:
  /* Pacify compilers when the user code never invokes YYERROR and the
     label yyerrorlab therefore never appears in user code.  */
  if (0)
    YYERROR;
  ++yynerrs;
 
  /* Do not reclaim the symbols of the rule whose action triggered
     this YYERROR.  */
  YYPOPSTACK (yylen);
  yylen = 0;
  YY_STACK_PRINT (yyss, yyssp);
  yystate = *yyssp;
  goto yyerrlab1;
 
 
/*-------------------------------------------------------------.
| yyerrlab1 -- common code for both syntax error and YYERROR.  |
`-------------------------------------------------------------*/
yyerrlab1:
  yyerrstatus = 3;      /* Each real token shifted decrements this.  */
 
  /* Pop stack until we find a state that shifts the error token.  */
  for (;;)
    {
      yyn = yypact[yystate];
      if (!yypact_value_is_default (yyn))
        {
          yyn += YYSYMBOL_YYerror;
          if (0 <= yyn && yyn <= YYLAST && yycheck[yyn] == YYSYMBOL_YYerror)
            {
              yyn = yytable[yyn];
              if (0 < yyn)
                break;
            }
        }
 
      /* Pop the current state because it cannot handle the error token.  */
      if (yyssp == yyss)
        YYABORT;
 
 
      yydestruct ("Error: popping",
                  YY_ACCESSING_SYMBOL (yystate), yyvsp);
      YYPOPSTACK (1);
      yystate = *yyssp;
      YY_STACK_PRINT (yyss, yyssp);
    }
 
  YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN
  *++yyvsp = yylval;
  YY_IGNORE_MAYBE_UNINITIALIZED_END
 
 
  /* Shift the error token.  */
  YY_SYMBOL_PRINT ("Shifting", YY_ACCESSING_SYMBOL (yyn), yyvsp, yylsp);
 
  yystate = yyn;
  goto yynewstate;
 
 
/*-------------------------------------.
| yyacceptlab -- YYACCEPT comes here.  |
`-------------------------------------*/
yyacceptlab:
  yyresult = 0;
  goto yyreturnlab;
 
 
/*-----------------------------------.
| yyabortlab -- YYABORT comes here.  |
`-----------------------------------*/
yyabortlab:
  yyresult = 1;
  goto yyreturnlab;
 
 
/*-----------------------------------------------------------.
| yyexhaustedlab -- YYNOMEM (memory exhaustion) comes here.  |
`-----------------------------------------------------------*/
yyexhaustedlab:
  yyerror (YY_("memory exhausted"));
  yyresult = 2;
  goto yyreturnlab;
 
 
/*----------------------------------------------------------.
| yyreturnlab -- parsing is finished, clean up and return.  |
`----------------------------------------------------------*/
yyreturnlab:
  if (yychar != YYEMPTY)
    {
      /* Make sure we have latest lookahead translation.  See comments at
         user semantic actions for why this is necessary.  */
      yytoken = YYTRANSLATE (yychar);
      yydestruct ("Cleanup: discarding lookahead",
                  yytoken, &yylval);
    }
  /* Do not reclaim the symbols of the rule whose action triggered
     this YYABORT or YYACCEPT.  */
  YYPOPSTACK (yylen);
  YY_STACK_PRINT (yyss, yyssp);
  while (yyssp != yyss)
    {
      yydestruct ("Cleanup: popping",
                  YY_ACCESSING_SYMBOL (+*yyssp), yyvsp);
      YYPOPSTACK (1);
    }
#ifndef yyoverflow
  if (yyss != yyssa)
    YYSTACK_FREE (yyss);
#endif
 
  return yyresult;
}
 
#line 3921 "/home/fabien/NIGHT/prod/pips/src/Libs/c_syntax/cyacc.y"