pike.git / src / language.yacc

version» Context lines:

pike.git/src/language.yacc:105:   %left TOK_LSH TOK_RSH   %left '+' '-'   %left '*' '%' '/'   %right TOK_NOT '~'   %nonassoc TOK_INC TOK_DEC      %{   /* This is the grammar definition of Pike. */      #include "global.h" - RCSID("$Id: language.yacc,v 1.239 2006/02/25 11:11:40 grubba Exp $"); + RCSID("$Id: language.yacc,v 1.240 2006/03/02 10:38:51 grubba Exp $");   #ifdef HAVE_MEMORY_H   #include <memory.h>   #endif      #include "interpret.h"   #include "array.h"   #include "object.h"   #include "stralloc.h"   #include "las.h"   #include "interpret.h"
pike.git/src/language.yacc:3425:    }    | TOK_SSCANF '(' error '}' { $$=0; yyerror("Missing ')'."); }    | TOK_SSCANF '(' error ';' { $$=0; yyerror("Missing ')'."); }    ;      lvalue: expr4    | '[' low_lvalue_list ']' { $$=mknode(F_ARRAY_LVALUE, $2,0); }    | type6 TOK_IDENTIFIER    {    add_local_name($2->u.sval.u.string,compiler_pop_type(),0); -  $$=mklocalnode(islocal($2->u.sval.u.string),0); +  $$=mklocalnode(islocal($2->u.sval.u.string),-1);    free_node($2);    }    | bad_expr_ident    { $$=mknewintnode(0); }    ;   low_lvalue_list: lvalue lvalue_list { $$=mknode(F_LVALUE_LIST,$1,$2); }    ;      lvalue_list: /* empty */ { $$ = 0; }    | ',' lvalue lvalue_list { $$ = mknode(F_LVALUE_LIST,$2,$3); }