pike.git / src / las.c

version» Context lines:

pike.git/src/las.c:1:   /*\   ||| This file is part of Pike. For copyright information see COPYRIGHT.   ||| 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.284 2002/03/04 22:00:13 mast Exp $"); + RCSID("$Id: las.c,v 1.285 2002/04/09 17:11:56 nilsson 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:1705: Inside #if defined(SHARED_NODES)
   _CAR(n)=tmp;    n=freeze_node(n);    }   #else    _CAR(n)=tmp;   #endif    break;       case F_AUTO_MAP:    case F_APPLY: -  if(CAR(n)->token == F_CONSTANT && +  if(CAR(n) && CAR(n)->token == F_CONSTANT &&    CAR(n)->u.sval.type == T_FUNCTION &&    CAR(n)->u.sval.subtype == FUNCTION_BUILTIN &&    CAR(n)->u.sval.u.efun->name &&    CAR(n)->u.sval.u.efun->name->str[0]=='`')    {    /* FALL THROUGH */    }else{    tmp=mknode(F_ARG_LIST, CDR(n), arg);   #ifdef SHARED_NODES    n=defrost_node(n);