pike.git / src / language.yacc

version» Context lines:

pike.git/src/language.yacc:177:   %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.143 1999/12/13 01:21:12 grubba Exp $"); + RCSID("$Id: language.yacc,v 1.144 1999/12/14 00:24:36 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:1296:    func_args failsafe_block    {    struct pike_string *type;    char buf[40];    int f,e;    struct pike_string *name;       $4=mknode(F_COMMA_EXPR,$4,mknode(F_RETURN,mkintnode(0),0));    type=find_return_type($4);    -  if(type) +  if(type) {    push_finished_type(type); -  else +  free_string(type); +  } else    push_type(T_MIXED);       e=$3-1;    if(varargs)    {    push_finished_type(compiler_frame->variable[e].type);    e--;    varargs=0;    pop_type_stack();    }else{