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.337 2004/08/16 16:22:11 mast Exp $ + || $Id: language.yacc,v 1.338 2005/02/08 16:37:46 grubba Exp $   */      %pure_parser      %token TOK_ARROW      /*    * Basic value pushing    */   %token TOK_CONSTANT TOK_FLOAT TOK_STRING
pike.git/src/language.yacc:106:   %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.337 2004/08/16 16:22:11 mast Exp $"); + RCSID("$Id: language.yacc,v 1.338 2005/02/08 16:37:46 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:3207:    yyerror("Unexpected end of file.");    free_node ($2);    }    | expr4 open_bracket_with_line_info error ';'    {$$=$1; yyerror("Missing ']'."); free_node ($2);}    | expr4 open_bracket_with_line_info error '}'    {$$=$1; yyerror("Missing ']'."); free_node ($2);}    | expr4 open_bracket_with_line_info error ')'    {$$=$1; yyerror("Missing ']'."); free_node ($2);}    | open_paren_with_line_info comma_expr2 ')' -  {$$=$2; COPY_LINE_NUMBER_INFO ($$, $1); free_node ($1);} +  { +  $$=$2; +  if ($$) +  COPY_LINE_NUMBER_INFO ($$, $1); +  free_node ($1); +  }    | open_paren_with_line_info '{' expr_list close_brace_or_missing ')'    {    $$=mkefuncallnode("aggregate",$3);    COPY_LINE_NUMBER_INFO ($$, $1);    free_node ($1);    }    | open_paren_with_line_info    open_bracket_with_line_info /* Only to avoid shift/reduce conflicts. */    m_expr_list close_bracket_or_missing ')'    {