pike.git / src / las.c

version» Context lines:

pike.git/src/las.c:1:   /*\   ||| This file a part of Pike, and is copyright by Fredrik Hubinette   ||| Pike is distributed as GPL (General Public License)   ||| See the files COPYING and DISCLAIMER for more information.   \*/   /**/   #include "global.h" - RCSID("$Id: las.c,v 1.201 2000/08/31 21:57:13 grubba Exp $"); + RCSID("$Id: las.c,v 1.202 2000/09/04 14:49:05 per Exp $");      #include "language.h"   #include "interpret.h"   #include "las.h"   #include "array.h"   #include "object.h"   #include "stralloc.h"   #include "dynamic_buffer.h"   #include "lex.h"   #include "pike_types.h"
pike.git/src/las.c:647:    yyerror("Parent has left.");    }    }    break;    case F_LOCAL:    /* FIXME: Should lookup functions in the local scope. */    default:    res->tree_info |= a->tree_info;    }    if (i && IDENTIFIER_IS_FUNCTION(i->identifier_flags)) { - #ifdef PIKE_DEBUG -  /* Temporary check to see that the flags aren't reset somewhere. */ -  if (i->opt_flags != (OPT_SIDE_EFFECT | OPT_EXTERNAL_DEPEND)) { -  yywarning("Identifier %s has opt_flags 0x%04x!", -  i->name->str, i->opt_flags); -  } - #endif /* PIKE_DEBUG */ +     res->node_info |= i->opt_flags;    } else {    res->node_info |= opt_flags;    }    } else {    res->node_info |= opt_flags;    }    if(b) res->tree_info |= b->tree_info;    }    break;