pike.git / src / language.yacc

version» Context lines:

pike.git/src/language.yacc:1:   /* -*- c -*-   || This file is part of Pike. For copyright information see COPYRIGHT.   || Pike is distributed under GPL, LGPL and MPL. See the file COPYING   || for more information. - || $Id: language.yacc,v 1.403 2008/01/05 20:09:46 grubba Exp $ + || $Id: language.yacc,v 1.404 2008/01/05 20:10:41 grubba Exp $   */      %pure_parser      %token TOK_ARROW      /*    * Basic value pushing    */   %token TOK_CONSTANT TOK_FLOAT TOK_STRING
pike.git/src/language.yacc:149:      /* Get verbose parse error reporting. */   #define YYERROR_VERBOSE 1      /* #define LAMBDA_DEBUG 1 */      static struct pike_string *get_new_name();   int add_local_name(struct pike_string *, struct pike_type *, node *);   int low_add_local_name(struct compiler_frame *,    struct pike_string *, struct pike_type *, node *); - static mark_lvalues_as_used(node *n); + static void mark_lvalues_as_used(node *n);   static node *lexical_islocal(struct pike_string *);   static void safe_inc_enum(void);   static int call_handle_import(struct pike_string *s);      static int inherit_depth;   static struct program_state *inherit_state = NULL;      /*    * Kludge for Bison not using prototypes.    */
pike.git/src/language.yacc:4360:    struct pike_type *type,    node *def)   {    return low_add_local_name(Pike_compiler->compiler_frame,    str,    type,    def);   }      /* Mark local variables declared in a multi-assign expression as used. */ - static mark_lvalues_as_used(node *n) + static void mark_lvalues_as_used(node *n)   {    while (n && n->token == F_LVALUE_LIST) {    if (CAR(n)->token == F_ARRAY_LVALUE) {    mark_lvalues_as_used(CAAR(n));    } else if ((CAR(n)->token == F_LOCAL) && !(CAR(n)->u.integer.b)) {    Pike_compiler->compiler_frame->variable[CAR(n)->u.integer.a].flags |=    LOCAL_VAR_IS_USED;    }    n = CDR(n);    }