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.101 1999/11/11 15:55:36 grubba Exp $"); + RCSID("$Id: las.c,v 1.102 1999/11/11 19:43:11 grubba 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:712:    /* FIXME */    if(IDENTIFIER_IS_CONSTANT(ID_FROM_INT(new_program, i)->identifier_flags))    {    res->node_info = OPT_EXTERNAL_DEPEND;    }else{    res->node_info = OPT_NOT_CONST;    }    res->tree_info=res->node_info;      #ifdef __CHECKER__ -  CDR(res) = 0; +  _CDR(res) = 0;   #endif    res->u.id.number = i;   #ifdef SHARED_NODES    res->u.id.prog = new_program;   #endif /* SHARED_NODES */       res = freeze_node(res);       check_tree(res,0);    return res;