pike.git / src / language.yacc

version» Context lines:

pike.git/src/language.yacc:181:   %left F_LSH F_RSH   %left '+' '-'   %left '*' '%' '/'   %right F_NOT '~'   %nonassoc F_INC F_DEC      %{   /* This is the grammar definition of Pike. */      #include "global.h" - RCSID("$Id: language.yacc,v 1.177 2000/04/06 19:24:08 hubbe Exp $"); + RCSID("$Id: language.yacc,v 1.178 2000/04/07 19:59:40 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:1660:   #if 0    if(compiler_pass > 1 &&    (i=ID_FROM_INT(new_program, id)))    if(!(i->identifier_flags & IDENTIFIER_SCOPED))    n = mkidentifiernode(id);   #endif       low_add_local_name(compiler_frame->previous,    $1->u.sval.u.string, type, n);    + #ifdef LAMBDA_DEBUG    fprintf(stderr,"FNORD: ");    simple_describe_type(type);    fprintf(stderr,"\n"); -  + #endif /* LAMBDA_DEBUG */       $<number>$=id;    free_string(name);    }    failsafe_block    {    int localid;    struct identifier *i=ID_FROM_INT(new_program, $<number>4);       $5=mknode(F_COMMA_EXPR,$5,mknode(F_RETURN,mkintnode(0),0));